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CAPÍTULO 1 


ORGANIZAÇÃO 




Quando você desempacotou o seu computador MSX, deve ter encontrado um 
cabo para conectar o vídeo, ou a TV, ao computador. 

Por enquanto você só precisa conectar o seu computador à televisão. Numa TV 
colorida, você pode usar os comandos de cores do MSX, com mais vantagens mas, uma 
TV em branco e preto também serve. 

Para conectar a TV ao computador, insira um dos conectores no soquete 
marcado com “TV” na parte traseira do computador: a outra ponta deve ser conectada à 
tomada da antena da TV. Se o seu televisor tiver dois soquetes, marcados com U1IF e 
VHF, use o soquete LHF. 

Ligue a TV e espere ela esquentar. Então ligue o seu computador e, se ele 
estiver corrctamcntc sintonizado, vocc verá cm primeiro lugar uma tela semelhante a esta: 


sistema MSX 
vcrsüo 1.0 

Copyright 1983 by Microsoft 


... e então, após uma pausa, aparecerá algo mais ou menos assim: 
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BASIC MSX versão 1.0 
Copyrghl 1983 b y Microsoft 
1*8815 Bytes livres 
OK 


coor auto goto list run 


vSc vocc não vir essa segunda tela, ajuste o sintonizador do seu TV até que 
consiga. (O número de bytes livres irá depender do tamanho da memória do seu 
computador.) Isso acontece sempre que o MSX é ligado. 

Sc o seu televisor tiver um controle de sintonização deslizante, ajuste-o até obter 
uma imagem dara. Se você tiver um botão de pressão para cada canal, é aconselhável 
sintonizar cm um canal fora dc uso. 

Agora vocc está pronto para usar o teclado, IZxpermiente da maneira que quiser, 
pois não !iá risco de danificar o seu computador! Tudo o que digitar aparecerá na tela do 
TV. Provavelmente você rcccbcrá muitas mensagens de erro do computador, mas não se 
preocupe, pois aprenderá como evitar isso mais tarde. 

Se olhar para a tela, logo à primeira vista, irá ver um pequeno quadrado branco 
abaixo da mensagem “OK*’. Flc 6 chamado cursor, e mostra onde o próximo caractere irá 
aparecer na tela. Tente digitar algumas letras com ele. É bom adquirir o hábito de usar 
ambas as mãos enquanto estiver digitando. Pressionando qualquer tecla você faz com que 
apareça o caractere correspondente na tela. Digite: 

A veloz raposa salta sobre o cacnorro preguiçoso. 

Para obter espaços, pressione a barra comprida na parte inferior do teclado. Para 
conseguir caracteres maiusculos basta pressionar a tecla <SHIFT> c a tecla do caractere 
que vocc quer, simultaneamente. 

No lado esquerdo do teclado existe uma tecla marcada com <CAPS LOCK>. 
Ao pressionar essa tecla, tudo o que você digitar depois aparecerá em letras maiusculas. 
Para voltar à modalidade minúsculas, pressione essa tecla outra vez. 
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Agora olhe para os números. Veja o que acontece se você pressionar <SHIFT> 
e, ao mesmo tempo, as teclas com os números de 1 a 9. 

Na parte superior do teclado existem cinco teclas alongadas marcadas com 
os caracteres F1 a F5. Essas são as teclas de função. A linha exibida na base da 
tela é destinada a essas teclas. Esqueça-as por enquanto, pois iremos ver o seu uso no 
Capítulo 8. 

Agora encontre a tecla <STOP>. Você irá usá-la muitas vezes junto com a 
tecla Control, marcada com <CTRL>. A tecla < F.SC > nada faz por enquanto, mas será 
usada para controlar a impressora. 

A tecla <TAB> move o cursor ao longo da tela. Ela apaga qualquer caractere 
em seu caminho. Se o cursor estava onginalmentc no lado esquerdo, ele é movido para 
nona posição. Pressionando-se <TAB> outra vez, ele se movimenta para a décima sétima 
posição e, então, para a vigésima sexta posição. 

A tecla «cGRAPH> permite que você imprima caracteres gráficos, que são 
acessados pelas teclas de caracteres. Pressionando-se <L GRA> (ou <GRAPH> no 
HOT-BIT) (é L GRA ou R GRA no Expcrt) com qualquer tecla dc caractere, obtêm-se 
caracteres gráficos». Você poderá ter diferentes caracteres gráficos se pressionar 
<SHIFT> <L GRA> c uma das teclas dc caracteres ao mesmo tempo. Encontre os 
caracteres 

Pressionando <RGRA> (ou <CODE> no HOT-BIT) (LGRA ou RGRA no 
Expcrt) c uma tecla dc caractere, você pode obter caracteres europeus ou gregos (por 
exemplo, a, (J, á, ü etc.) Experimente com essas teclas. Tente pressiona <SHIFT> 
também. A maioria das teclas fornecerá a você diferentes caracteres gráficos. 

Uma tecla muito importante é a tecla <RETURN>. Sempre que quiser que o 
MSX leia o que você escreveu na tela, pressione <RETURN>. Se você pressioná-la 
agora, provavelmente obterá uma mensagem dc erro. Não sc preocupe, isso significa que o 
computador não entendeu o que você digitou. 

Agora a tela deve estar toda cheia. Observe que quando chega ao fim da tela 
todo o texto sc move para cima uma linha automaticamente e você perde a linha superior. 
Isso é chamado “rolamento”, ou scroll. 

Para limpar a tela, pressione <SHIFT> e <HOME> simultaneamente. 
<ITOME> é uma das quatro teclas de edição na parte superior direita do teclado. Observe 
que após ter feito isso, o cursor salta para o canto superior esquerdo da tela. Sempre que a 
tela se tomar confusa, você pode limpá-la dessa forma. Pressionando-se essa tecla sem 
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pressionar <SHITT>, o cursor volta para a parte superior esquerda da tela sem apagar o 
texto. 


Agora digite uma linha inteira de caracteres. Para corrigi-la você deve 
pressionar a tecla de retrocesso <BS>. Isso cancelará qualquer coisa à esquerda do 
cursor. Da mesma forma que qualquer outra tecla, ela é repetitiva; se você mantê-la 
pressionada, irá, ccrtamcntc, apagar a linha inteira. 

Digite mais alguns caracteres e experimente pressionar as teclas do cursor: 



Elas movem o cursor na direção marcada sem apagar o que encontram pela frente. 

Tente apagar um caractere em particular usando as teclas <BS> c do cursor. 
Quando achar que captou a idéia, veja o que acontece quando você pressiona <DEL>, 
que é outra das quatro teclas de edição no canto superior direito do teclado. 

Essa tecla apaga o caractere sob o cursor e move tudo à direita do cursor um 
espaço para a esquerda. Se você mantiver o dedo na tecla <DEL>, deletará tudo o que 
estiver à direita do cursor. 

Suponha que você digitou o seguinte: 

abefg 

Você pode querer inserir um “d” entre o “c” e o “P\ Para fazer isso, mova o cursor até 
que o mesmo esteja sobre a letra "f ’ e então pressione a tecla de inserção «: INS>. O 
cursor será substituído por uma linha em branco. Se você digitar “d”, ele aparecerá 
inserido entre o “e” e o “f ’. Para fazer o cursor voltar ao modo normal, pressione <1NS> 
outra vez. Pratique correções usando o cursor e as teclas de edição. 


A quarta tecla de edição <SELECT> não faz nada por enquanto. 




Organização 


7 


EXERCÍCIOS 


1. Digite os dois caracteres gráficos associados a cada tecla, e o próprio caractere. Agora 
cancele os caracteres alfanuméricos, deixando somente os caracteres gráficos na 
tela. 

2. Imprima o numero 0 e a letra O; observe a diferença entre os dois caracteres. Você 
deve usar o 0 quando estiver digitando um número, pois de outra forma o computador 
uiformará um erro. Compare também o 1 com a letra minúscula 1. Mais uma vez, não 
os confunda. 




CAPÍTULO 2 


I 


MODO DIRETO 



Urna vez familiarizado com o teclado e com o uso das teclas <BS> e <INS>, 
você está pronto para digitar seus primeiros comandos no computador. Em primeiro lugar, 
limpe a tela pressionando as teclas <SH1FT> e <HOME> simultaneamente. Faça isso 
sempre que a tela estiver muito cheia ou confusa. 

Agora digite cuidadosamente: 

PRINT "Bem-vindo ao MSX" 
e então pressione a tecla <RETURN >. 

Você deve ver ‘Bem-vindo ao MSX” exibido na linha diretamente abaixo 
daquela que vocc digitou, com a palavra OK sob cia. Talvez, cm vez disso, vocc rcccba 
uma mensagem de erro. Não se preocupe, repita o comando, pois provavelmente você 
cometeu algum erro de digitação. 

Ao se pressionar <RETURN>, o computador executa um comando. Ele 
somente reconhece certas palavras, chamadas comandos, das quais PRINT é uma delas. 
Ao ver PRINT, seguido por alguma palavra entre aspas, ele sabe que é para imprimir tudo 
o que estiver incluído entre as aspas. 

O computador não diferencia entre letras maiusculas e minúsculas nos comandos 
e ignora espaços. Portanto, não adianta colocar espaços entre as letras de um comando, 
pois os mesmos não serão aceitos pelo computador. 

pnnt "Bem-vindo ao MSX" <RETURN> 
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irá produzir o mesmo resultado. 

Tudo o que você digitou entre as aspas será impresso exatamente como você 

digitou. 

Para imprimir um número você não precisa dc aspas. Digite: 

PRINT 12345 <RETUHN> 

Você irá ver 12345 exibido diretamente abaixo da última linha impressa na tela. Da mesma 
forma, não importa quantos espaços você tenha digitado entre o comando PRINT c o 
número. Os espaços entre os números a serem impressos serão ignorados. 

PRINT 12 345 <RETURN> 

produz o mesmo resultado. 

Agora digite: 

PRINT 3+4 <RETURN> 

o computador imprimirá o valor 7. Ele calculou a expressão 3+4 c fomcccu o resultado. 
Se desejar imprimir o texto 3+4 como está, você deve digitar o seguinte: 

PRINT “3+4" <RETURN> 

O computador agora vê 3+4 como uma string, e a imprime exatamente como você a 
digitou. 

Para subtrair um número, use o sinal 

Para multiplicar números, d usado o sinal ' V\ em vez do sinal de multiplicação 
mais comum "x”. Isso foi feito para evitar a confusão com a letra “x'\ 

Para dividir, use o sinal em vez de 

Digite o seguinte, mas não se esqueça de pressionar <RETURN> após 
cada linha. 

PRINT 4-3 
PRINI "3+4 =";3+4 
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No último exemplo, você verá: 


34-4 = 7 


Quando o computador vê o ele pensa que existe outro item a ser impresso, neste 
caso, a expressão 3+4. Dessa forma, ele calcula a expressão e a imprime logo após a 
string. 

Observe agora que existe sempre um espaço em branco antes e após um número 

positivo. 


PRINT "aa” ; 3;4;-5 Wcc" 
irá fornecer: 

aa 3 4-5bbcc 

Como pode notar não são deixados espaços quando vocc imprime strings. Ao imprimir um 
número negativo, o sinal negativo é colocado no lugar do espaço em branco. Quando não 
6 usada pontuação entre strings, o computador assume que foi colocado ponto e vírgula. 
Você deve usar pontuação entre os números, pois de outra forma o computador irá vê-lo 
como um número grande. 

O computador também reconhece a vírgula em um comando PR TNT, caso em 
que os itens serão impressos na mesma linha, sendo que o segundo será impresso 15 
posições dc caractere à direita do primeiro item impresso. 

Agora digite as duas linhas seguintes: 

LET A=3 
PRINT A 

O número 3 6 exibido na tela. 

O comando LET atribui um valor à variável, que neste caso (detectar) chamada 
A. No exemplo anterior, quando o computador recebe o comando PRINT, ele está 
esperando um número, pois não existem aspas. Ele então verifica em sua memória e 
descobre o valor que foi associado à variável A e, assim, imprime esse número. 
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Você pode ter expressões mais complicadas no comando LET: 

LET 6=31*72*4 
PRINTR 

O número 8928 é exibido. 

Agora digite: 

LFTB=R+1000 

Vocè obtém: 

9928 

O comando LET anterior parece matematicamente incorreto, mas ele é perfeitamente 
aceitável em computação. A expressão à direita de um sinal “=” é calculada e colocada 
na variável do lado esquerdo. Neste caso, a variável B é, agora, igual ao seu valor antigo 
mais 1000. 

Nomes de variáveis devem começar com unia letra. Após essa letra podem ser 
usados números. Efcpaços era branco são ignorados em nomes dc variáveis como: 

A A ô equivalente a AA 

Podem ser usadas letras maiusculas ou minúsculas, mas o computador não fará 
distinção entre as duas. 

CARRO é equivalente a carro 

O computador só lê os dois primeiros caracteres de um nome dc variável, dc modo que: 
AB ó equivalente a carro 

É importante não usar nomes de comandos em um nome de uma variável, de 
modo que: 

INTEIRO 


é inválido pois TNT é um comando. 
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Algumas palavras são reservadas para versões futuras da linguagem e não 
podem scr usadas dentro de nomes de variáveis, por exemplo: 

NAME 

é inválido, pois “NAME” é unia palavra reservada. 

Eis alguns nomes de variáveis permitidos: 

NÚMER02 

n2 

NUM 

Estes nomes não serão permitidos: 

2 n O primeiro caractere deve ser uma tetra. 

num? '•?" é um caractere inváldo em um nome de variável. 

As strings também podem ser armazenadas como vanáveis; 

LET A$="AIÔ" 

PRINT A$ 

É impresso Alô, já que PRINT AS é o equivalente a digitar PRINT “ Alô*’ nesse exemplo. 

Nomes dc variáveis string devem terminar com o sinal “S” para distingui-las de 
variáveis numéricas. 

Eis alguns nomes válidos para variáveis string: 

ANO$ 

RECEITAS 

LIS 

Estes nomes são inválidos: 

A Sem o sinal $. 

A.BS V é um caractere rvákdo. 

1PRIMS O primeiro caractere deve ser uma tetra. 

ON$ ON ô um comando. 




Modo dirrto 


n 


TONAL$ ON 6 um comando. 

NAME$ NAME é uma palavra reservada. 

Outro comando útil é o ÍNPIJT. Digite: 

INPUT A 

Quando o computador percebe esse comando, ele exibe um ponto de interrogação e espera 
que você digite um número. Esse número é então associado à variável A. Digite um 
numero. Você irá vê-lo aparecer após o ponto de interrogação. Se você digitar agora: 

PRINT A 

o número que você havia digitado será impresso. Se tivesse digitado uma string você 
obteria um erro. 


EXERCÍCIO 


1. Encontre o valor de A, onde: 


A=49*38.07/13 




CAPÍTULO 3 


ESCREVENDO UM PROGRAMA 





Vocc já trabalhou bastante no modo dircto. Vocc digitou um comando na tela, 
pressionou <RETURN> e o computador executou o comando em seguida. Se 
quiser repetir o comando, vocc tem de digitá-lo outra vez, o que consome muito tempo. 

Se quiser que o computador se lembre de um comando, vocc deve fornecer a ele 
um número de linha, por exemplo: 

10 PRINT "ISTO E UM TESTE" <RETURN> 

Ao pressionar <RETURN> o computador vê o número da linha, neste caso 10, e ele sabe 
que a linha é parte de um programa. Dessa forma, ele armazenará a linha inteira na 
memória. Ao terminar isso. ele exibirá o lembrete “OK” na tela. 

Para fazer com que o computador execute a linha, o comando RUN deve ser 
usado. Digite: 

RUN <RETURN> 

e na tela aparecerá: 

ISTO É UM TESTE 

Para escrever um programa, cada comando deve ser precedido por um número 
de linha. Pode-se usar qualquer valor até 65529, mas é aconselhável iniciar com o 10 e 

Tf 


Escrevendo um programa 15 


incrementar em valores de 10, isto é, 10, 20, 30, 40 etc. Dessa forma, quando você tiver 
terminado de digitar o seu programa existirá espaço para inserir novas linhas entre as já 
existentes, bastando usar os números de linhas 15, 25, 36 etc. O computador sempre 
executa um programa, linha a linha, iniciando pela de menor número. 

Antes de digitar o próximo programa, digite o seguinte: 

NEW <RETURN> 

Lsse comando apaga qualquer programa que esteja na memória do computador. É 
aconselhável usar esse comando antes de digitar um novo programa. 

Agora digite o seguinte programa. Nâo se esqueça: a tecla <RETURN> deve 
ser pressionada após a digitação de cada linha: 

10 PRINT "QUAL E O SEU NOME?" <RETURN> 

20 INPUT N* <RETURN> 

30 PRINT "OLA ";N*;" BEM UINDO AO MSX" <RETURN> 

Execute esse programa. Se nào ocorreu nenhum erro de digitação você irá ver a 
linha abaixo na tela: 

QUAL t O SEU NOME 9 
? 

A instrução INPUT, na linha 2U, está esperando que uma variável string seja digitada. 
Digite o seu nome e pressione <RETURN>. O computador imprimirá: 

OLÁ nome BEM-VINDO AO MSX 

Após você digitar o seu nome, o computador executará a linha 30 e dará a mensagem de 
boas-vindas. Quando o computador cxccuta a última linha ele sabe que alcançou o final do 
programa e termina a execução dando a você o lembrete “OK”. Você agora está de volta 
ao modo direto. 

Se você recebeu uma mensagem de erro em vez de uma mensagem dc 
boas-vindas, cometeu algum erro de digitação em uma ou mais linhas. Antes de procurar 
os erros, é melhor obter uma listagem do seu programa. Para fazer isso, digite: 


LIST e p'9ssbn© ^RETURN> em seguida 
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O comando irá LISTar o seu programa imediatamente, iniciando pela linha de número 
menor. Todos os nomes de comandos e variáveis serão LISTados em leiras maiusculas, 
mesmo que vocc os tenha digitado em minúsculas. Você deve ver. 

10 PRINT "«UAL E 0 SEU NOHE?" <RETURN> 

20 INPUT NS <RFTURN> 

30 PRINT "OLA BEh VINDO AO MSX" <RCTURN> 

Agora examine a linha referenciada na mensagem de erro para encontrar os erros de 
digitação. Uma vez encontrado um erro, modifique essa linha usando as teclas de edição e 
de cursor descritas no Capítulo l. Então, com o cursor ainda na linha corrigida, pressione 
<RETURN>. Isso diz ao computador para substituir a linha antiga pela versão corrigida. 

Mova o cursor totalmcntc para fora da listagem do programa antes dc digitar 
RUN outra vez. Para fazer isso, mantenha a tecla <1^ pressionada até que u cursor esteja 
• na parte inferior da tela. Agora digite RUN outra vez. seguido por <RETURN>. Repita 
o processo de edição até que o seu programa funcione! 

Se a tela parecer muito confiísa, pressione <SH1FT> e <CLS> antes dc 
digitar LIST. 

Se você tiver cometido muitos erros ao digitar uma linha, às vezes é mais rápido 
redigitar a linha inteira, ou seja, rcdigitá-la, em vez de editá-la com as teclas do cursor. 

10 PRONT "QUAL É O SEU NOME 9 ” 

Nesse caso. pode ser mais rápido digitar a linha inteira: 

10 PRINT “QUAL É O SEU NOMEr <RETURN> 

A linha antiga é então apagada e substituída pela nova. 

Se você quiser remover uma linha de seu programa, tudo o que tem a fazer c 
digitar u número da linha e pressionar <RETURN>. Após ter feito isto, você não pode 
mais ter a linha de volta, a não ser que a digite de novo: 

10 <RETURN> 


apaga a linha 10. 
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Digite o seguinte programa: 

10 REM ESTE PROGRAMA SE AUTO-REPETE 
20 CLS 

30 INPUT "QUAL E O SEU NOME"?NS 
40 PRINT "OLA "tNSj" BEM VINDO AO MSX" 

50 GOTO 30 

O comando REM diz ao computador para ignorar tudo o que estiver nessa linha. O 
restante da linha é usado como um lembrete, para você, do que o programa faz.. É 
conveniente incluir comandos REM em seu programa, pois é muito fácil esquecer como 
um programa funciona quando você voltar a ele posteriormente. 

A segunda linha limpa a tela. Você já conhece uma dupla de teclas que faz isso, 
<SHIFT> <HOME> , mas se quiser limpar a tela durante seu programa deve usar o 
comando CLS. 

O comando na linha 30 já é familiar. Este exemplo mostra como imprimir uma 
mensagem antes do Tudo o que você tem a fazer é colocar a mensagem entre aspas, 
seguida por ponto e vírgula e pelo nome da variável. Aqui. a ordem dos símbolos é 
importante. 

A linha 50 diz ao computador para voltar para a linha 30 e continuar a execução 
a partir dali. Essa manobra é conhecida como “loop infinito ’, pois o computador volta 
para a linha 30 sempre que alcança a linha 50. Isso continuará a acontecer até que você 
interrompa a execução do programa. 

Agora tente executar esse programa. 

Quando desejar interromper o programa basta pressionar <CTRL> <STOP> , 
simultaneamente. Você irá obter a mensagem: 

BREAK in 30 

Para continuar a execução digite CONT. Não se esqueça de pressionar <RETURN>. 
Você verá que a execução reinicia de onde foi interrompida. 

Se você interrompeu o programa em qualquer outra linha, verá que a execução 
recomeça na linha seguinte. 

EXERCÍCIO 

1. Escreva um programa que pergunte seu nome e idade, e imprima-os em seguida. 
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MAIS SOBRE ARITMÉTICA 
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A esta altura você já conhece os símbolos matemáticos; 

+ - / 

Outru símbolo iStil é “ A ”. Ele eleva um número a uma dada potência. Por 

exemplo; 


2 elevado a 3 é esento 2 A 3 
Digite: 

PRINT 4 a 5 <RETURN> 
e você obterá a resposta 1024. 

Os parênteses podem ser usados nas expressões aritméticas. Qualquer expressão 
dentro dos parênteses é sempre executada em primeiro lugar. 

Todos os símbolos listados abaixo podem ser combinados cm uma expressão, 
sendo a mesma executada na seguinte ordem: 

( ) Expressões dentro de ( ) são resolvidas em primeiro lugar. 

A Exponencial. 

• , f Multiplicação e divisão têm a mesma pnondade. 

+, - São calculadas em último lugar. 

7 8 
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Por exemplo, o computador cxccuta a expressão abaixo em três estágios: 

(3+4).7 A 2 

Primeiro estágio 7-7 A 2 
Segundo estágio 7*49 
Terceiro estágio 343 

Você deve incluir o sinal 'V* entre os parênteses, ou seja: 

PRINT (3+4)(4-2) ESTÁ ERRADO! 

Essa linha deve ser. 

PRINT (3 +4)- (4— 2) 

No exemplo do programa seguinte, é requisitada uma temperatura em graus 
Fahrenheit, a qual é convertida para graus centígrados: 

10 REM CONVERSÃO DE TEMPERATURAS 
20 CL6 

30 INPUT ••TEMPERATURA FAHRENHEIT" | F 
40 C - < F— 32) *5/9 

50 PRINT " TEMPERATURA EQUIVALENTE EM CENTÍGRADOS; M I C 
è>0 GOTO 30 

Observe que na linha 40 a instrução LET foi omitida. Essa instrução é opcional. 
Assim que o computador vê uma variável e, a seguir, um sinal de igual, ele atribui o valor 
da expressão à direita do “=" à variável numérica do lado esquerdo do “=‘\ 

Ao executar esse programa vocè verá que a temperatura em centígrados é dada 
em 14 casas decimais. Se você quiser arredondar a temperatura para o valor inteiro pode 
usar a função INT. 

INT converte números reais, isto é, números que contêm casas decimais para 
números inteiros. O argumento deve ser incluído entre parênteses. 

A função INT arredonda um número real para o menor número inteiro mais 

próximo: 


3.4 se torna 3 
-2.7 se toma -3 
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Para arredondar um número real para o maior número inteiro mais próximo, e 
não para o menor inteiro mais próximo, deve-se somar 0.5: 

INT(3.9) equivale a 3 

INT{3.9+.5) equivale a 4 

Você deve indicar ao computador quando quer que ele armazene números 
inteiros e quando quer que ele armazene números reais. Para distinguir os dois, os nomes 
de números inteiros terminam com o sinal 

Substitua as linhas 40 e 50 do último programa por 

40 C%=INT((F-32)-5/9+.5) <RETURN > 

50 PRINT "TEMPERATURA" EQUIVALENTE EM 

CENTÍGRADOS É"; C% <RETURN> 

O programa também funcionará se vocé usar C no lugar de C%, mas o número será 
armazenado em 14 casas decimais, mesmo que todos os dígitos após o ponto decimal 
sejam zeros. Os zeros nao serão impressos, mas serão armazenados na memória, dessa 
forma usando um espaço valioso. Assim sendo, é melhor usar nomes de variáveis inteiras 
sempre que possível. 


EXERCÍCIO 

✓ 


1. Converta o programa de temperatura de modo que as temperaturas sejam digitadas em 
graus centígrados c impressas cm Fahrenheit. Vocc precisará usar a equação: 


F=C»9/5+32 




CAPÍTULO 5 


O USO DE LOOPS 



Este programa imprime qualquer tabela de multiplicação que você desejar. Não 
se aborreça digitando: 

10 REH TABUADA DF hllLT IPL ICACAO 
20 INPUT "MULTIPLICADOR";* 

30 PRINT "UMA VEZ"lM?"="sl*M 
40 PRINT "DOIS VEZES" 

50 PRINT "TRES VEZES" ; M 3*H 


e assim por diante. Esse programa é um tanto longo c repetitivo. Uma torma muito mais 
sensata de fazer o mesmo cálculo 6 obtida usando-se um Joop FOR...NEXT: 

10 Rbrt 1ABUADA DE MULTIPLlCACAO COh LOOP 
20 INPUT "MULTIPLICADOR" ; HZ 
30 FOR CZ=i TO 10 

40 PRINT CZ;"VEZES";MZ;"=";CZ*MZ 
50 NEXT CZ 
60 GOTO 20 

Observe as variáveis numéricas inteiras que são usadas neste programa: 
C% e M%. 

Na primeira vez que o computador executa a linha 30, ele define C% = i e 
então passa para a linha 40. Quando ele executa a linha 50, o comando NEXT diz para 
retornar à linha 30. De volta à linha 30, ele incrementa o contador por um, isto é, faz 
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C% - 2. Este Ioop é repetido até que C% = 10. Após isso, o computador ignora o 
comando NEXT da linha 50 e executa a linha 60. 

Você pode incrementar o contador em quantidades maiores que 1 usando a 
palavra STEP nu comando FOR... NEXT. Tente o seguinte: 


10 FOR N = 0 TO i 2 STEP 2 
20 PRINT N 
30 NEXT 


Você deve ver: 

0 

2 

4 

6 

8 

10 

12 

As restrições para a nomeação do contador são as mesmas que para os nomes 
das variáveis numéricas. Veja o Capítulo 2. 

Se você substituir o limite no programa anterior por 13 ele não lerá qualquer 
efeito sobre os resultados. O loop terminará quando o contador for igual a 12. Com um 
valor de STEP igual a 2 e iniciando o contador em <reru, o mesmo nunca alcançará o valor 
13. 

Vocé pode usar tanto números reais como inteiros para definir o valor inicial e 
final do contador e do tamanho do incremento. Variações negativas também podem ser 
usadas: 

Í0 FOR N= 10 TO 2.5 STEP -2.5 
20 PRINT N 
30 NEXT N 

resultando em: 

10 

7.5 
b 

2.5 
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Seja cuidadoso ao inicializar o contador com um valor maior que o valor final; 
lembre-se de usar variações negativas ou, de outra forma, ocorrerá uma mensagem 
de erro. 

É possível colocar o loop FOR...NEXT dentro de outro loop FOR...NEXT. Isso 
é chamado loop em nível. Iremos usar essa técnica no exemplo seguinte para imprimir um 
desenho com o símbolo * V*: 

Í0 REM LOOP EM NIVEL 
20 PRINT"*" 

30 FOR I=i TO 9 
40 FOR J=í TO I } UM 

50 PRINT j LOOP 

60 NEXT J } EM NIVEL 

70 PRINT 
80 NEXT I 

Você deve ver: 

♦ 

+* 

*** 

***** 

****** 

******* 

******** 

********* 

Observe o “ ; no final do comando PRINT na linha 50. Isso faz com que o 
comando PRINT seguinte imprima na mesma linha, iniciando na primeira posição vazia, 
não ocorrendo retomo de cursor. 

A linha 30, faz I = 1. Isso limita o contador no loop interno, de modo que na 
primeira vez que o loop I é executado o ‘V* é impresso uma só vez. Na vez seguinte da 
rodada do loop externo, olé incrementado e passa a valer 2. O J agora pode receber os 
valores 1 e 2 de modo que o loop interno é executado duas vezes, resultando em dois 
impressos na mesma linha no loop. 

Padrões diferentes podem ser obtidos variando-se o valor do STEP. 
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EXERCÍCIOS 

1. Veja o que acontece se você omitir as linhas 20 e 70. 

2. lente executar o programa anterior com STEP 4 no loop externo. Alteie o limite 
superior desse loop. Com um valor diferente de variação, as linhas 20 e 70 precisarão 
ser alteradas para formar um padrão regular. 

3. Varie o tamanho de STEP no loop interno e veja o que ocorre. 




CAPÍTULO 6 


O USO DE CONDIÇÕES 
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Algumas vezes você pode querer que o seu programa tome um determinado 
caminho dependendo dc uma certa condição. O comando IF...THEN é usado para isso. Eis 
um exemplo do seu uso: 

20 IFA=BTHEN GOTO 100 

30 PRINTA.B 

A linha 20 diz ao computador que SE (IF) o conteúdo da variável A for igual ao 
conteúdo da variável B, ENTÃO (THEN) VÁ PARA (GOTO) a linha 100; caso contrário 
continue com a linha seguinte do programa, que neste caso imprime as variáveis A e B. 

Vánas condições podem dar continuidade ao comando ÍF: 


> 

MAIOR QUE 

< 

MENOR QUE 

= 

IGUAL A 

> = 

MAIOR OU IGUALA 

< = 

MENOR OU IGUALA 

< > 

DIFERENTE DE 


Qualquer comando pode vir em seguida do THEN. Por exemplo: 


20 IF A=B THEN PRINT B 
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O programa seguinte solicita dois números, e então os imprime, o maior em 
primeiro lugar. 


10 INPUT~NUMEROS";A,B 
20 IF A >B THEN BOTO 40 
30 SUAP A , B 

40 PRINT"0 NUhERO hAIOR Es"; A 
50 PRINT"0 NUMERO MENOR E:";B 

Neste programa ambos os valores das vaniveis são solicitados através do 
comando INPUT. O computador imprime “Números?” e então espera até que os dois 
valores tenham sido digitados. Você pode digitar um dos números, uma vírgula, e o 
segundo número e então pressionar <RETURN>; ou ainda digitar o primeiro número, 
pressionar <RFTURN> c então digitar o segundo número e pressionar *rRETUKN>. 
Na segunda opção o computador irá impnmir dois pontos de interrogação após você ter 
pressionado < RFTURN>. O programa continua a ser executado. 

Em geral, qualquer quantidade de variáveis pode ser solicitada em um único 
comando INPUT, desde que as mesmas estejam separadas da mensagem entre aspas por 
um ponto c vírgula c que uma esteja separada da outra por uma vírgula. 

O comando SWAP, na linha 30, troca o conteúdo da vanávcl A pelo conteúdo 
da variável B. Se a condição A:>B, na linha 20, não for verdadeira, então, em vez do 
programa saltar para a linha 40. ele executa a linha 30. O comando SWAP assegura nesse 
programa, que o maior número seja colocado na variável A. As duas linhas seguintes 
imprimem os números. O SWAP também pode ser usado para trocar o conteúdo de 
vanáveis string. 

O comando IF...THEN pode incluir a palavra ELSE. Todos os comandos após a 
palavra ELSE serão executados se a condição antes do THEN não for satisfeita. O 
programa anterior poderia ser escrito assim: 

10 I NPUT"NUMEROS" ; A , B 

20 IF A >B THEN PRINT "O NUMERO MAIOR E*";A ELSE PRINT 
"O NUhERO MAIOR E s " ; B 

30 IF A >B THEN PRINT "O NUMERO MENOR Es";B ELSE PRINT 
"0 NUMERO MENOR Es"; A 
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Pode-se utilizar mais de uma condição após o comando IF usando o AND c o 
OR. Por exemplo: 

10 INPUT A,B,C 

20 IF A=B AND A > C THEN PRINT A 

O programa anterior somente irá imprimir o valoi de A se ele for igual a B e 
(AND) maior que C. Compare o programa anterior com o próximo programa: 

10 INPUT A.B.C 

20 IF A =B OR A > C THEN PRINT A 

Essa versão do programa irá imprimir o valor dc A sc A for igual a B ou (OR) 
maior que C. 

.As desigualdades também podem ser usadas com strings. Uma string é 
armazenada como uma scqüôncia dc números na memória do computador, sendo cada 
caractere representado por um ndinero diferente. Para comparar duas strings, o computador 
inicia o processo comparando dois números representando o primeiro caractere de cada 
string. Se os dois primeiros caracteres forem iguais, então ele compara os dois seguintes e 
assim por diante Caracteres maiúsculos ou minúsculos são representados por números 
diferentes. 

De A a Z pelos números 65 a 90 
üe a a z pelos números 97 a 122 

Outros caracteres como ‘V também podem ser comparados. Voltaremos ao 
assunto tuturamente (veja o Capítulo 20). 

As strings abaixo estão classificadas em ordem decrescente, ou seja, com a 
“maior” em primeiro lugar: 

"zebra" 

“a a" 
u aA" 

"AND" 

Para resumir o que você aprendeu neste capítulo, eis um curto programa que faz 
uso completo dos comandos IF, THEN e SWAP. 
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O programa classifica três números digitados e os exibe em ordem, o maior em 
primeiro lugar: 

10 REM CLASSIFICA 

20 INPUT "TRES NUHEROS"; A r B r C 

30 IF B > A THEN SWAP A , B 

40 IF OB THEN SWAP B,C 

50 IF B > A THEN SWAP B r A 

60 PRINT A„B„C 


Execute esse programa digitando vários números. Você pode explicar a lógica 
desse programa? 


EXERCÍCIOS 


1. Usando o programa anterior, escreva um programa que classifique três strings cm or- 
dem alfabética. 

2. O programa-exemplo pode trabalhar somente com três números. Você consegue 
escrever um programa melhor, que possa manusear mais que três números? Um 
exemplo é fornecido no Capítulo 13. 




CAPÍTULO 7 



COMANDOS UTEIS E 
DICAS PARA ESCREVER PROGRAMAS 


Um comando muito útil para economizar tempo 6 o comando AUTO. Ao 
digitá-lo, você descobrirá que a linha número 10 aparece AUTOmaticamente na tela. 
Digite REM após isso e então pressione <RETURN>. Agora a linha 20 aparecerá Esse 
processo continuará indefinidamente. Para parar a numeração AUTOmática de linhas 
pressione <CTRL> <STOP>. 

Antes de digitar um novo programa é aconselhável usar o comando NEW para 
cancelar as linhas do programa antigo e as suas variáveis. Caso contrário, você poderá 
descobrir algumas linhas de seu antigo programa misturadas com as do novo, 
especialmente se o programa anterior for maior que o atual. Isso pode resultar em 
um caos! 

O comando LIST 6 usado para listar o seu programa na tela. Se você quiser 
listar apenas uma linha do programa (você pode ler recebido uma mensagem de erro 
referente a essa linha), digite LIST seguido pelo número da linha: 

LIST 30 

Isso faz com que a linha 30 seja exibida na tela. 

Ao LISTar o seu programa, você provavelmente notará que os caracteres 
minúsculos em comandos e funções e nomes de variáveis são substituídos por caracteres 
maiúsculos. 
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H sempre aconselhável, dar um título a seu programa usando a instrução REM, 
de modo a utilizá-la ao longo do programa para explicar cada parte. Isso toma a tarefa 
bem mais fácil, principal mente quando vocc voltar a editar o programa após algum tempo 
da sua criação. O comando REM sempre pode ser removido em uma data posterior caso 
você ache que está saindo fora dos limites da memória. Assim, tendo em vista que você 
pode remover um comando REM posteriurmente, nunca coloque um comando GOTO 
fazendo referência a uma linha com REM. 

A maneira mais simples de se cancelar uma única linha, é simplesmente digitar o 
número da linha e < RETURN >. Porém, se você quiser cancelar uma grande parte do 
programa ase o comando DFJ.FTF,: 

UfcLETfc 20-80 

Isso irá cancelar todas as linhas entre os números 20 e 80 inclusive. Seja cuidadoso para 
não cancelar linhas por acidente, pois, uma vez usado esse comando, a única maneira de 
se conseguir essas linhas de novo é digitando-os novamente! 

Mais de um comando pode scr incluído cm uma linha, porém devem ser 
separados por dois pontos. Por exemplo: 

20 PRINT -A" :GOTO 10 

Esta é uma linha válida. A letra “A” será impressa e então o computador irá saltar para a 
linha 10. Qualquer quantidade de comandos pode ser ligada dessa maneira. Isso irá 
economizar memória du computador, pois uma certa quantidade de memória é usada para 
armazenar o número de cada linha. Entretanto, um programa é geralmente mais legível se 
você evitar o uso de muitos comandos na mesma linha. Existe também um limite no 
número de caracteres que podem ser incluídos cm uma mesma linha - até 255 caracteres 
podem ser digitados, incluindo os espaços. O computador ignora qualquer caractere além 
desse limite. 

Para demonstrar isso, digite o seguinte: 

10 PRINT ..." 


preenchendo a tela com “*”s. Agora pressione <SH1FT> <CLS> e execute o programa; 
somente 247 serão impressos. O computador armazenou a linha ate o caractere 
número 255. Observe que se você esquecer as aspas finais de uma string, o computador 
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automaticamente assume a sua presença. Entretanto, não adquira o hábito de fazer isso, ou 
poderá produzir confusão. 

Mais um detalhe acerca do PR1NT - existe uma abreviação para indicá-lo: é o 
Digite: 

io ? 

Agora digite LIST. O ponto de interrogação será substituído por PRINT. 

Ao inspecionar um programa listado, você pode descobrir que se esqueceu de 
digitar uma linha, ou mesmo um determinado número de linhas. E possível que não haja 
espaço suficiente para inserir as linhas esquecidas devido ao espacejamento inadequado de 
números de linhas. Sc isso acontecer, você pode RENUMerar as linhas do seu programa 
usando o comando RENUM. Por exemplo: 

10 REH 

Í1 REH 

12 REH 

Para inserir uma linha entre as linhas 10 e 11, digite RENUM. Agora LISTe o 
seu programa e você verá: 

10 REH 

20 REH 

30 REH 

Agora vocé pode inserir facilmente novas linhas entre as linhas 10 e 20, usando 
números de linha entre 1 1 e 19. 

É possível armazenar mais dc um programa na memória. Para fazer isso você 
pode armazenar o primeiro programa entre as linhas de número 10 a 100, por exemplo, c o 
segundo entie as linhas 500 c 1000. Quando digitar RUN você deve evitar que o 
computador execute o primeiro programa e vá direto ao segundo. Para fazer isso, use o 
comando END Essa deve ser a última instrução do primeiro programa. Ao encontrar o 
END o micro pára a execução e coloca vocé de volta no modo direto. 

Para continuar a execução que. neste caso, significa executar o segundo 
programa armazenado na memória, você deve digitar CONT seguido por < RETURN >. 
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Uma forma de executar o segundo programa antes do primeiro, é ir diretamente a ele, 
usando: 


RUN 500 

Isso inicia a execuçáo na linha 500. O mesmo resultado pode ser obtido usando: 

GOTO 500 

O comando STOP também pode ser usado em um programa. Esse comando, 
da mesma forma que um comando END, coloca o micro de volta ao modo direto. 
Entretanto, ele produz a mensagem “break in...”, informando o número da linha do 
comando STOP. Após um comando STOP você pode continuar a execução do programa 
digitando CÜNT <RETURN>. 

Você pode parar a execução de um programa a qualquer momento pressionando 
a tecla <STOP>. Para continuar a execuçáo pressione essa tecla outra vez. Você não 
será capaz de usar o comando CONT neste caso, pois ele só pode ser usado com 
comandos STOP dentro do programa. Contudo, se você pressionar <CTRL> <STOP>, 
interromperá o programa c voltará ao modo direto. Uma vez no modo direto, você pode 
reiniciar a execução a partir da próxima linha, usando o comando CONT. Digite o 
seguinte programa: 

10 REM 

20 PRINT"adeus" 

30 GOTO 20 

e execute-o em seguida. Agora pressione <STOP>. Isso irá parar o programa. A única 
forma de reiniciar a execução é pressionar a tecla <STOP:> novamente. Execute o 
programa de novo, desta vez parando-o pressionando <CTRL> <STOP>. Reinicie o 
programa usando CONT. 

Agora digite este programa: 

10 REM 

20 PRINT "OLA" 

30 STOP 

40 PRINT "ADEUS" 

50 END 

60 GOTO 20 
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Execute-o!! Use o comando CONT tanto após o comando FND como após o comando 
STOP para reiniciar a execução do programa. 

Um comando diferente, que você náu precisará usar neste momento, mas que é 
bom conhecer, é o CLEAR. Ele diz ao computador para apagar todas as variáveis até 
então armazenadas na memória. Ele também pode ser usado para conseguir espaço para 
uma variável. Ao se ligar o computador, as strings podem ocupar somente 200 caracteres 
na memória do micro. Por exemplo, você pode aumentar isso para 255 caracteres 
digitando: 


CLEAR 255 

Outro comando relacionado com a memória do computador é o FRE. Ele indica 
quanta memória livre existe tanto na área do programa BASIC como na área de 
armazenamento de strings: 


PRINT FRE(O) Fornece a memória livre na área do programa BASIC. 

PRINT FRE(" M ) Fornece a memóna livre na ârea de string. 

Finalmcnte. dois comandos que foram projetados para ajudar você a descobrir 
erros em seus programas. TRON, que significa “Trace On’\ faz o computador exibir o 
número dc cada linha à medida que cia é executada. Digite: 

10 REH USO DO TRON 

20 PRINT "OLA r ESTA LEVANTADO?" 

30 INPUT "6IN OU NA0"|AS 

40 IF A*="NAO" THEN BEEP = GOTO 20 

50 PRINT "MA PARA A CANA" 


Agora digite TRON e execute o programa. Aparecerá o seguinte: 

[101(201 OLÁ, ESTÁ LEVANTADO 9 

[30) SIM ou NÃO? 

Aqui o programa espera por uma entrada de dados. Se você digitar SIM, irá 

receber: 


[40][50J VÁ PARA A CAMA 
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Se digitar NÃO, voce irá receber: 

[40] [20] OI A, FSTÁ l FVANTADO? 

[30] SIM cxj NÃO? 

O comando BEEP, na linha 40, é o comando mais fácil de se usar para se obter 
um som no computador. 

Para desativar o TRON, use TROFF. 




CAPITULO 8 


PA 



m 


TECLAS DE FUNÇÃO 


São as cinco teclas situadas na parte superior do teclado. Cada tecla tem duas 
funções, uma das quais é utilizada pressionando-se a tecla dirctamente, e a outra 
pressionando <SHIFT> e a tecla simultaneamente; ou seja, as funções H, F 2, F3, T4 e 
F5 são usadas pressionando-se a própria tecla, enquanto que F6, F7, F8, F9 e FIO se 
obtem pressionando- se <SHIFT> mais a tecla correspondente. 

Ao se ligar o computador, as teclas já estão programadas para certas funções. 
Uma lista dessas funções pode ser exibida digitando-se o comando: 

KEY LIST 

O conteúdo das cinco primeiras teclas é visualizado na dltinia linha da tela. As 
outras cinco são exibidas, -ao se pressionar <SH1FT>. Para desligar essa visualização 
digite KEY OFF, e para ligar a visualização digite KEY ON. Os últimos três comandos 
podem ser incluídos em um programa. 

No momento, esqueça as teclas Fl, F6 e F7. Falaremos sobre elas 
posteriormente. As funções das outras sete teclas devem ser familiares, pois elas são 
muito úteis: 
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Tecla 

Exibição 

Descrição 

F1 

color 

Veja o Capítulo 22. 

F2 

auto 

Esta tecla é programada para impnnur AUTU na 
tela, seguido de um espaço, ou seja, esta tecla 6 o 
equivalente a digitar “AUTO”. 

F3 

gotu 

É o equivalente a se digitar GOTO seguido de um 
espaço. 

F4 

list 

6 o equivalente a se digitar LIST seguido de um 
espaço. 

F5 

run 

A função desta tecla é ligeiramente diferente das 
anteriores. F.la é o equivalente a digitar RUN se- 
guido de <RETURN>. Esta tecla executa o pro- 
grama que estiver contido na memória do micro. 

F6 

color 15,11* 

Veja o Capítulo 22. 

1-7 

cioad” 

Veja o C apítulo 11. 

FB 

conl 

t. o equivalente a CONT seguido por <RETURN>. 
Sc vocó parou um programa pressionando <CTRL> 
<STOP> ou com uma instrução bND ou STOl', 
pode reiniciar a execução a partir da linha seguinte 
pressionando <SHIFT> e F8. 

F9 

üsi + CHR$(13)** 

F9 lista o programa automaticamente. 

FIO 

run 

Esta tecla de funçáo 6 útil pois limpa a leia e executa 
qualquer programa que estiver na memória. 


* No HOT-BIT lemos COLOR 15,4,4. 

*♦ No HOT-BIT lemos LIST, que lista a última linha editada. 

É possível redefinir as funções destas teclas usando o comando KEY, seguido 
pelo número da tecla, uma vírgula e, então, uma string contendo a nova função. Digite: 

KEY VPRINT" <RETURN> 

Isso fará com que o comando PRINT seja exibido sempre que FI for pressionada. 



Teclas de função 
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Observe que a lista na base do modo de tela mudou: COLOR foi substituído 
por PRINT. 

KEY 6, “NEW*' + CHR$(13) 

programa a tecla 6 para executar o comando NEW. CHR$(13) é o equivalente a se 
pressionar < RETURN> (veja maiores detalhes no Capítulo 20). 

Quando definir uma tecla, você pode usar um máximo de 15 caracteres na string. 
Observe que CHR$(I3) ocupa a posição dc um caractere. 


EXERCÍCIO 


1. Programe a tecla F7 para RENUMerar o seu programa imediatamente após ter sido 
pressionada. 




CAPÍTULO 9 


MAIS SOBRE O COMANDO PRINT 
E O MODO DE TELA 



Até agora você usou o comando PRINT para imprimir slrings e variáveis com 
uma vírgula ou um ponto e vírgula separando a lista de itens a serem impressos. O ponto c 
vírgula faz com que os itens sejam impressos próximos uns aos outros; a vírgula faz com 
que dois itens sejam impressos na mesma linha, o primeiro no infcio da linha e o segundo 
separado por 15 espaços. 

Um ponto c vírgula no final dc um comando PRÍNT suprime o retomo do cursor 
de modo que o próximo comando PRINT irá iniciar a imprimir na mesma linha: 

10 PRINT "SER OU NAO SER-"; 

20 PRINT "EIS A QUESTÃO" 

Tudo isso 6 impresso na mesma linha: 

SEH OU NÁO SER - EIS A OUESTÃO 

Você provavelmente descobrirá que em determinado estágio vocé irá querer 
imprimir uma tabela de resultados, ou talvez uma lista das opções já tabuladas. Dois 
comandos que o ajudam a fazer isso são TAB e LOCATE. 

Para saber usar esses comandos você deve conhecer os diferentes modos de 

tela. 


Mais sobre o comando Print e o modo de tela 
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Existem dois modos de tela de texto, SCREEN 0 c SCREEN 1. Ao se ligar o 
computador, vocé está automaticamente em um desses modos. Neste capítulo será usado o 
modo padrão: SCREEN 1. Para ter certeza dc que você está nesse modo, digite: 

SCRFFN 1 <RETURN> 

A tela do computador, nesse modo, tem 32 posições de largura por 24 de altura. 
Cada posição de caractere ocupa um quadrado, de oito por oito pontos. 

O outro modo de tela de texto, SCREEN ü, tem 40 posições de largura por 24 
dc altura. As posições de caractere nesse modo são ligeiramente menores, cada uma 
ocupando um retângulo de seis por oito pontos. Nesse modo de tela a margem tem a 
mesma cor do fundo. Para acessar esse modo de tela digite: 

SCREEN 0 <RETURN> 

Agora retome ao SCREEN 1 digitando: 

SCREEN 1 <RETURN> 


A origem das coordenadas de ambos os modos de tela de texto 6 o canto superior esquerdo 
do modo dc tela. Observe que a primeira linha e a primeira coluna de cada tela são 
chamadas linha ü e coluna U, respectivamentc. Dessa forma, a última coluna do vSCREEN 
0 6a coluna 39 e no SCREEN 1 é a coluna 31. A última linha em ambos os modos de tela 
é a linha 23. 

Você não pode imprimir na última linha antes dc usar KEY OFF para apagar a 
lista de teclas de função. 


SCREEN 0 


SCREEN 1 


0 


33 


28 




23 


23 
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Você pode alterar o número máximo padrão de caracteres em cada linha usando o 
comando WIDTH, seguido de um número. Esse número define a largura máxima da tela. 
Na tela do SCREEN 0, o número máximo de caracteres que voce pode definir ao longo do 
modo de tela é 40 e na tela do SCREEN 1 é 32. Você pode reduzir a largura de qualquer 
um dos dois modos de tela para somente 1 caractere se desejar! Experimente: 

SCREEN 0 <RETURN> 

WIDTH 20 <RETURN> 

Esses comandos definem a largura máxima da tela no SCREEN 0 para 20 
caracteres. Você agora vai descobrir que só pode escrever nas 20 colunas mais centrais. 
Para voltar à largura e tela padrões, digite: 

SCREEN 0 <RETURN> 

WIDTH 40 <RETURN> 

Agora voltemos à tabulação! O comando TAB é sempre usado em conjunto com PRINT. 
Esse comando faz com que o computador comece a imprimir na coluna especificada (ou 
coordenada x) pelo comando TAB. Por exemplo: 

PRINT TAB(10) “Isto faz iniciar a impressão na 1 1 9 posição de caractere." 

Não se esqueça de que a primeira posição de caractere da leia é a coluna 0, linha 
0. Altemativamente, você pode imaginar como sendo a posição dc coordenada dc 
caractere x, y = (0,0). 

Você pode usar mais de um comando T AB em um comando PRINT: 
PRINT TAB(3)4 TAB(7>8 

Isso irá imprimir o número 4 na quarta coluna. O espaço em branco que sempre precede 
um número positivo é impresso na terceira coluna. O número 8 é impresso na mesma linha, 
com o espaço em branco que o precede na sétima coluna. Não é preciso pontuação entre 
os comandos TAB, mas não se esqueça dos parênteses. 

Você só pode especificar a coluna no comando TAB, de modo que se qui- 
ser imprimir tanto cm uma coluna coroo em uma linha em particular, você deve usar o 
comando LOCATE exatamente antes do comando PRINT. Esse comando define a posição 
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do cursor; o primeiro número no comando LOCATE é o número da coluna (ou coordenada 
x); o segundo número é o da linha (ou coordenada y). Por exemplo: 

i CLS 

10 LOCATE 6,2 

20 PRINT "NOME" 

30 LOCATE 20,2 

40 PRINT "APELIDO" 

que imprime: 

NOME APELIDO 

na terceira linha da tela. 

Você precisa dc um comando LOCATE para cada comando PRINT. Uma 
alternativa é usar o LOCATE somente para definir a linha, e então usar PRINT TAÜ. O 
programa seguinte fornece o mesmo resultado que o anterior: 

10 CLS 

20 LOCA IE ,2 

30 PRINT T AB ( 6 ) "NOME"T AB ( 20 > "APELIDO" 

Quando a coordenada x é deixada de fora do comando LOCATE, o computador 
entende que você quer permanecer na posição x atual. O comando CLS da linha lü está 
definido para x = 0, de modo que esse valor de x é usado para posicionar o cursor na 
linha 20. Observe que, apesar de você não ter especificado a coordenada x, você tem dc 
escrever a vírgula. 

O LOCATE não pode ser usado no modo direto porque, assim que esse 
comando é executado nesse modo, o cursor é colocado no lado esquerdo da linha seguinte, 
pronto para se digitar um novo comando. 

Você pode usar o LOCATE para desligar o cursor de dentro dc um programa, 
isto 6, desativar o pequeno quadrado branco. Para fazer isso, coloque uma vírgula após a 
coordenada y e siga-a com um zero. Para ativar o cursor novamente, substitua o 0 por 1 . 
Por exemplo: 


10 LOCATE ..0 
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desativa o cursor. F.nquanto que: 

10 LOCATE 10,10,1 

ativa o cursor e move-o para a posição de coordenada (10,10). Esse efeito não pode ser 
obtido no modo direto. 

Agora vamos a outro comando, SPC. Esse comando é usado dentro de um 
comando PRINT para especificar o número de espaços a serem impressos. O pequeno 
programa que vocc digitou antenormente, para impnmir os cabeçalhos “NOME” e 
“APELIDO ”, pode ser substituído por. 

10 CLS 

20 LOCATE r 2 

30 PRINT TAB<6)"N0ME"SPC<8>"APELID0" 

Qualquer número inteiro entre 1 e 255 pode seguir ao comando SPC; o número 
deve ser colocado entre parênteses. Sempre que você quiser impnmir uma string que 
contenha muitos espaços, é aconselhável usar o comando SPC, pois ele economiza 
memória. 


Existe um método alternativo de se imprimir espaços, usando SPACE$. Esse 
comando é mais versátil que o SPC, pois pode ser usado fora do comando PRINT, 
enquanto que SPC não. SPACES é usado para formar stnngs inteiras de espaços. Por 
exemplo: 


A$=3PACE$(10) 


é o equivalente a: 

A$=" 

Usando esse comando, podemos atribuir nossos cabeçalhos a uma variável e 
imprimi-los tantas vezes quantas desejadas: 

10 Hl = "NOhE"+SP ACE3» ( 8 ) +"APELIDO" 

20 CLS 

30 LOCATE ,2 
40 PRINT TAB(6)H1 
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Não sc esqueça dc que isso não pode ser feito com o SPC. 

A=SPC(1G) É ERRADO! 

EXERCÍCIO 

1. Escreva um programa que entre a data de hoje e a data de seu nascimento; agora 
imprima a sua idade. Tabule as mensagens impressas na tela usando LOCATE. 




CAPÍTULO 10 


PROGRAMAÇÃO INTERATIVA 


Um programa é chamado “interativo" se, em algum ponto durante a sua 
execução, ele receber dados do usuário. Este capítulo tem a finalidade dc tratar dos 
comandos INPUT, 1NKEYS e INPUTS, usados em programas interativos. 

Apesar de TAB poder ser usado somente com o comando PRINT, LOCATE 
pode ser usado com o comando INPUT também: 

10 LOCATE 10.22 

20 INPUT "ARTIGO, VALOR"*A%,V 

Você irá ver: 

ARTIGO, VALOR? 

aparecer na linha 22 da tela. O computador irá esperar até que você tenha INSERIDO uma 
string c então um número. Para fazer Isso, vocc pode pressionar <RETURN> apds ter 
digitado a variável string e então inserir o número, ou digitá-los juntos, separando a string 
e o número por uma vírgula Entretanto, se usar o comando LINE INPUT, você pode 
digitar a linha inteira de texto em uma única variável stnng! 

10 LOCATE 10,22 

20 LINE INPUT "ARTIGO. VALOROU 
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Você irá ver: 

ARTIGO, VALOR? 

na linha 22 da tela. Agora, se vocè digitou: 

Banaras, amendoins o saquinhos de chá Cz$25,00 

a linha inteira, incluindo os brancos», será colocada na variável L$. Se você substituir 
LINE INPUT por um comando INPUT, tudo após a vírgula será ignorado. 

LÍNE INPUT pode ser usado somente com variáveis string de modo que: 
10 LINF INPUT A É ERHAUO' 

A linha que você digitou pode ter qualquer tamanho até 200 caracteres. O 
tamanho da linha pode ser estendido para até 255 caracteres, usando o comando CLEAR 
(veja o Capítulo 7). 

Ao contrário de INPUT, LINE INPUT não produz automaticamente o lembrete 
do ponto de interrogação, dc modo que sc vocè quiser isso, deve incluí-lo na mensagem 
após o comando. 

Em determinado ponto do programa, você pode querer que o computador pare e 
pergunte sobre as diversas opções que vocè queira escolher. Por exemplo, em um 
programa de jogo, você pode querer que o computador pergunte ao jogador se ele quer 
que as instruções sejam exibidas ou, no final do jogo, sc ele quer jogar outra vez. Você 
pode usar o comando INKEY$ para fazer isso. Esse comando testa o teclado para ver se 
uma tecla foi pressionada. Se uma delas o foi, o caractere da tecla é introduzido na 
variável string INKEY$; se não, uma string vazia é retomada para a variável string 
ÍNKEYS c o computador executa a linha seguinte do programa. 

A seguinte listagem pode ser colocada no final de um jogo: 

100 CL S 

110 LOCATE .10 

120 PRINT "CONTINUA JOGANDO ?" 

130 PRINT "TECLE S <SIH> OU" 

140 PRINT " N < NAO ) " 

150 A%=INKEYS 

160 IF A*="N" OR A%="n" THEN END 
170 IF A*="S" OR A%="s" THEN GOTO 100 
180 GOTO 150 
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Na primeira vez que a linha 150 é alcançada, INKEY$ ou contém uma string vazia ou o 
caractere de uma tecla sendo pressionada. Se uma das teclas, S, s, N ou n foi pressionada, 
enquanto o computador estava na linha 150, então o computador termina o programa ou 
inicia-o a partir da linha 10. O comando GOTO na linha 180 faz o computador voltar paia 
a linha 150 até que uma das quatro teclas de caractere (“S”, "s”, “N” ou “n”) 
reconhecidas pelo computador seja pressionada. 

Não se esqueça de que INKEYS é uma string e apenas pode ser comparada a 
outra variável string de modo que: 

A = INKEY$> É ERRADO! 

e resultará cm um crm do tipo “type mismatch” no Expeit ou “tipo desigual” no 
HOT-BIT; 

Outra função similar à INKEYS é INPUT$. Da mesma forma que INKEYS, cia 
lê o teclado direamente, mas em vez de somente \ci um caractere ela lê u número de 
caracteres especificados no comando 1NPUTS, isto é: 

10 A1=INPUTS<3) 

20 PRINT A» 

O computador irá esperar na linha 10 até que cinco teclas tenliain sido 
pressionadas. A linha 20 então imprime esses caracteres. O número seguinte ao INPUTS 
deve ser um inteiro na faixa de 1 a 200. Se um número real desta faixa for usado, ele 
será trocado para o inteiro menor mais próximo. 


EXERCÍCIO 


1. Use um comando INPUT no infeio dc um programa para digitar uma senha. As 
primeiras linhas de um programa podem perguntar pela senha e a execução do restante 
do programa deve iniciar somente após a senha correta ter sido digitada. 



CAPÍTULO 1 1 


GRAVANDO O SEU PROGRAMA EM UMA FITA 





Neste estágio, você já pode escrever programas bastante longos. Em vez de 
digitá-los toda vez que quiser executá-los, você vai descobrir que é muito mais 
conveniente armazenar o seu programa em fita. 

Em primeiro lugar, conecte o seu cassete ao computador. A maioria dos cassetes 
serve; um simples gravador monofônico é suficiente. É muito útil ter um contador de fita 
para anotar onde vocc armazenou o programa. O cassete deve ter uma tomada de entrada 
para usar com o microfone e unia tomada de saída para usar com tones de ouvido. 

Ligue o cassete ao seu micro seguindo as instruções do manual do fabricante. 

Coloque uma fita virgem no seu cassete. Rebobine-a se necessário e então 
execute-a até que alcance o final da parte transparente no início da fita. Zere o contador de 
voltas. 


Agora digite um pequeno programa em seu computador c, então, acrescente: 
CSAVL"nome" <RETURN> 

Você pode dar ao seu programa qualquer nome que desejar, desde que não 
exceda a seis caracteres. Os caracteres podem ser letras maiusculas ou minúsculas, ou 
números. O primeiro caractere do nome deve ser uma letra. 

Agora pressione os botões RECORD e PLAY do seu cassete e então pressione 
<RETURN> no computador. 
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Quando o computador terminar de gravar o programa, ele emitirá uma mensagem 
“OK’\ Pare a fita e anote o número do contador de fita. 

Para verificar se você gravou o seu programa com sucesso, desligue o 
computador para apagar o programa da memória. Rebobine a fita para o início ou na 
posição zero do contador. Agora ligue o computador e digite: 

CLOAD"nome" <RETURN> 
ou somente: 

CLOAD <RETURN> 

Se o nome do programa não for especificado, o computador carregará o primeiro 
programa que encontrar na fita. Agora pressione o botão PLAY no cassete. Você deve 
receber a seguinte mensagem na tela assim que o computador tiver encontrado o programa 
no Expeit: 

HOUNü: nome (no HOT-BIT é ACHEI: nome) 

quando o programa tiver sido carregado você receberá a mensagem “OK”. Assim que 
ela aparecer, pare a fita. 

Observe que a tecla de função F7 é programada para imprimir “CLOAD" na 
tela. Usando-a, você somente precisa digitar o nome do programa e as aspas finais. 

Você pode verificar que o programa no computador 6 o mesmo que o programa 
da fita, isto é, não ocorreram erros de gravação ou carga, pelo uso do comando CLOAD'* 
Para usá-lo, rebobine a fita até o inicio do programa e digite: 

CLOAD^NOMF" <RETURN> 

Ligue a fita. 

Se o programa da memória for o mesmo que o programa da fita você irá receber 
uma mensagem “OK". Se não a receber, você não conseguiu carregar o programa com 
sucesso (veja a seção de problemas no final deste capítulo). 

Quando armazenar diversos programas em uma fita é conveniente deixar espaços 
entre eles, bem como anotai a leitura do contador de fita no infcio dc cada programa. Sc 
você gravar um programa em cima de outro, perderá o primeiro programa. 
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Suponha que vocè tenha dois programas gravados na fita: o primeiro chamado 
“plot” e o segundo “ponto”. Se você digitar- 
ei LO AD‘‘ ponto" 

e ler a fita a partir do início, receberá as seguintes mensagens no caso do EXPERT: (*) 

CLOAD"ponto'' 

SKIP ;plot 

Fcundiponto 

OK 

(*) No caso de HOT-BIT as mensagens serão: 

PULEI : piot 
ACHEi : ponto 

O computador diz que pulou o programa “plot" e entáo carregou “ponto”. 

Agora vamos ver a função da tomada preta. Você pode usá-la se tiver uma 
tomada de controle remoto cm seu cassete, marcado com “KEMOTE”. Neste caso, 
conecte-o na tomada preta e digite 

MOTOR CN <RETURN> 

Se agora você introduzir CLOAD/CLOAD? ou CS A VE, o motor do cassete será 
automaticamente desligado pelo computador quando este terminar de ler ou dc gravar um 
programa da fita. Isso é bastante iltil, pois é muito comum esquecer de desligar o cassete 
após o uso de CLOAD ou CSAVE. 

Para desligar o motor do cassete, digite: 

MOTOR OFF <RETURN> 
ou digitando somente: 

MOTOR <RETURN> 


que terá o mesmo efeito de uma chave de controle que desliga se estiver ligado e liga se 
estiver desligado. 
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PROBLEMAS COM O CASSETE 


Sc você está tendo problemas ao gravar ou carregar os seus programas, 

verifique: 

1. Se você conectou o cassete ao computador. 

2. Se você conectou corretamente as tomadas ou se não estão desconectadas. 

3. Tente variar os controles de volume e tom do cassete. Normalmente, é melhor deixar o 
controle do tom no máximo e somente vanar o controle de volume. Inicie no volume 
médio e teme aumentar ou diminuir o volume a partir daf. 

4. Verifique se você está escrevendo o nome do programa de forma correta, caso você 
não consiga carregar um programa que já gravou. 

Se após todas essas tentativas você ainda não conseguir carregar o programa, é 

provável que haja um defeito físico ua sua fita cassete. 



CAPÍTULO 12 


U 


LENDO DADOS EM MATRIZES 



Até agora você somente digitou um número limitado de itens por vez. Mas 
existe um limite quando você quer gravar um grande volume dc dados, talvez uma longa 
lista de nomes ou números. Suponha que você queira manter uma agenda telefônica de 
todas as pessoas que conhece. Tente o seguinte: 

10 REH LISTA TELEFÓNICA UERSAO 1 

P0 INPUT "NOHE E TELEF ONE" ; Nl% , NUH1 

30 INPUT "NOHE E TELEFONE" ç N2S , NUM2 

-10 INPUT "NOME E TELEFONE" ; N31> r NUM3 

e assim por diante, mas com apenas dez nomes esse programa já sc tomará grande c 
repetitivo. É muito melhor usar um loop e executá-lo a cada entrada na agenda. Para isso, 
você precisará usar uma matriz. 

Uma matriz é um grupo de variáveis do mesmo tipo, mas diferem umas das 
outras pelo seu fndice. 

A(n) é uma matriz numérica. Se n - 10, então essa matriz pode aceitar ate 1 1 
variáveis chamadas A(0), A(l), A(2), ..., A(10). Vocô pode pensar que A é um nome de 
rua, caso em que o número a seguir forneça o número da casa na rua. 

Se você quiser usar matrizes com mais de onze elementos, deve informar ao 
computador o tamanho da matriz c seu nome. Isso 6 feito usando o comando DIM: 

DIM NUM(IP) 


51 


52 


MSX - Guia do Programador 


Trata-se de uma matnz numérica unidimensional, chamada NUM, que tem 
treze elementos. NUM(O), NUM(l), .... NUM(12). A matriz é chamada unidimensional, 
pois ela pode ser representada por um diagrama unidimensional. 

NUM(O) 

NUM(l) 

NUM(?) 

NUM(3) 

NUM(4) 

NUM(5) 

NUM(6) 

NUM(7) 

NUMÍ8) 

NUM(9) 

NUM(IO) 

NUM(11) 

NUM(12) 

ü primeiro caractere dc um nome dc matriz deve ser uma letra do alfabeto e o 
restante podem ser letras ou números. Da mesma funna que com variáveis simples, 
comandos ou caracteres de pontuação não podem ser incluídos no nome. Somente os dois 
primeiros caracteres são reconhecidos pelo cumputadur e caracteres minúsculos não são 
distinguidos dc maiusculos. Assim, os nomes a seguir têm o mesmo valor para o 
computador: 

abílO) 

ABOOJ 

Abaco(IO) 

Se você quiser ler strings cm uma matriz, deve usar uma Matriz de String. 
Aparentemente a única diferença entre ela e a Matriz Numérica 6 que o nome deve 
terminar com o sinal “$” (da mesma forma que as variáveis string). 

Nomes permitidos incluem: 

JOGO$(20) 

ENDEREÇOS(IO) 

A1SC5) 
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Estes nomes não serão permitidos: 

T OMO$( 1 2) Inclui o comanto T O. 

QUESTÒES?$(6i Sinais de pontuação nào são permitidos. 

FINAME$(2U0) NAME é uma palavra reservada. 

Você pode dimensionar em um comando no início do programa, todas as 
matrizes que quiser usar: 


DIVI A$(12).B(13),C(20) 

Não dimensione mais espaço dc matriz que o necessário, pois ao receber um 
comando DIM o computador define as seções de memória à parte para cada matriz, de 
modo que sc vocc não usar todas as matrizes, estará desperdiçando memória. 

Você pode economizar memória usando matrizes inteiras da mesma forma que 
matrizes de números reais, isto 6, NUM%(I2) irá aceitar até 13 variáveis inteiras, nos 
elementos NUM%(0). NUM9H1) NUM%(12). 

As matrizes multidimensionais serão descritas no próximo capítulo. 

Você agora pode ler os nomes e números da agenda telefônica, usando um 

loop: 


10 REM LISTA TELEFÓNICA VERSÃO 2 
20 REM DADOS NAS MATRIZES N% e NUM 
30 CLS 

40 INPUT "NUMERO DE ENTRADAS" ?E 
50 N=E-i 

60 DIM NS < N ) ,NUMCN> 

70 FOR 1=0 TO N 
80 CLS 

90 LOCATE r 10 

100 INPUT "NOME " ; NI ( I ) 

Ü0 INPUT "TELEFONE" :NUM(I) 

120 NEXT I 


A variável N é usada no comando DIM da linha 40 para assegurar que haja o 
mesmo número de elementos nas matrizes N$ e NUM à medida que as entradas na agenda 
são feitas. N é um a menos que E, já que o primeiro elemento dc cada matriz ó o elemento 
(0) e não o elemento (1). 
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Todos os nomes c números de telefones foram digitados em duas matrizes. A 
parte seguinte do prugrama exibe a agenda. O programa agura parece assim: 


10 REM LISTA TELEFÔNICA VERSÃO 3 
20 REM DADOS NAS MATRIZES N% e NUM 
30 CLS 

40 INPUT "NUMERO DE ENTRADAS" ; E 
50 N=E-Í 

60 DIH NS<N) , NUM ( N ) 

70 FOR 1=0 TO N 
00 CLS 

90 LOCATE ,10 

Í00 INPUT "NOME "»N1(I> 

110 INPUT "TELEFONE"? NUM < I ) 

120 NEXT I 

130 REM MOSTRA A LISTA 
140 CLS 

150 PRINT 7AB ( 2 > "NOME"T AB < 1 B ) "TELEFONE" 

160 PRINT TAB<2>"********************** 
170 FOR 1=0 TO N 
180 LOCATE 2, 4+1*2 
190 PRINT N*< I) 

200 LOCATE 18,4+1*2 
210 PRINT NIIMC I ) 

220 NEXT I 


Quando o programa termina, você perde todos os nomes e números! Porém, é possível 
gravar os dados no final do programa. Você pode então armazenar as dados cm fita com o 
programa. 

Para fazer isso, use os comandos READ e DATA. 

Um comando DATA pode ser seguido por uma longa lista de números ou dados 
seqüenciais, com os itens de dados separados por vírgula: 

DA^A Tomas.4a02073,Heniicue,2246607,Gerson,4421708 

A única restrição ao número de itens de dados armazenados é que o número total 
de caracteres não pode exceder a 255. 

Você pode ter tantos comandos DATA quantos quiser em um programa. Eles 
podem scr armazenados no lugar que você quiser, pois o computador irá saltar sobre os 
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comandos DATA até que apareça um comando READ. Frequentemente, é melhor manter 
todos os comandos DATA no Final do programa, pois dessa forma c mais fácil alterar os 
comandos DATA sem ter de procurá-los por todo o programa. 

Vamos voltar ao programa da agenda. Agora, em vez de entrar com os dados 
enquanto o programa estiver rodando, a última versão do programa já contém os dados nos 
comandos DATA. Nós sabemos o numero dc entradas da agenda, já que as colocamos nos 
comandos DATA, de modo que não precisamos inserir o número de entradas. O número 
de entradas é colocado na variável E, já que vo cc pode querer alterar o número dc 
entradas em uma data posterior e dessa forma precisamos alterar esse número. Neste caso, 
somente a linha 30 terá de ser alterada. O programa agora fica assim: 


10 REh LISTA TELEFÔNICA VERSÃO 4 
20 REM LE OS DATA E GUARDA NAS MATRIZES 
30 E=4 
40 N=E-1 

50 DIM N%(N> , NUM< N > 

60 CLS 

70 REh MOSTRA OS DATA 

80 PRINT TAB ( 2 ) "NOME"T AB ( 18 > "TELEFONE" 

90 FOR 1=0 TO N 
95 READ N%<T>,NUM(T> 

110 LOCATE 2, 4+1*2 
120 PRINT N*(I> 

130 LOCATE 18, 4+1*2 
140 PRINT NUM < I ) 

150 NEXT I 
160 END 

170 DATA JOAO , Bi 42233 , CARLOS ,3332222 
180 DATA "CARLOT A" , 777332 1 , PEDRO ,12 555 


Quando o pnmeiro comando READ for encontrado, o computador lerá o 
primeiro item do primeiro comando DATA para a variável do comando READ. Neste 
caso, TOMAS é lido para o elemento N$(0) da matriz N$. 

Na segunda vez que um comando READ for encontrado, o segundo item do 
comando DATA é READ. Uma vez que todos os itens em um comando DATA tenham 
sido lidos, o computador vai para o comando DATA seguinte e continua a ler seqüencial- 
mente. 


Você pode achar desnecessário ler o dado em uma matriz neste programa. Você 
está certo! Entretanto, uma vez que os dados estão em uma matriz, nós podemos processa- 
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la, se desejarmos, antes de exibi-la. O capítulo seguinte fornece a versão final deste 
programa, na qual as entradas são classificadas em ordem alfabética antes de serem 
exibidas. 

Você pode usar um comando READ para ler mais de um dado colocado em 
um comando DATA. O comando READ seguinte inicia no primeiro item de dados não 
lido. Por exemplo; 

10 READ A,B 

20 READ A*, BS 

30 PRINT A;B;A*;B% 

40 DATA 10,20, "Isto g una prova/, OLA 

resulta em: 

10 20 Isto é uma prova. OLÁ. 

Seja cuidadoso quando usar comandos DATA. Você deve se assegurar de que a 
ordem dos dados nos comandos correspondem à ordem dos tipos de variáveis do comando 
READ. Se você estiver lendo para uma variável numérica, você deve ter um número na 
posição correspondente do comando DATA. 

Você não pode colocar variáveis em comandos DATA, somente strings c 
números. Strings, em comandos DATA, não precisam ser incluídas entre aspas, a menos 
que contenham vírgulas, dois pontos ou espaços. 

Pode ser que você queira usar o mesmo comando DATA duas vezes. Na 
primeira vez, você pode querer apenas imprimir os dados, e na segunda fazer alguns 
cálculos com cies. Para fazer com que o computador volte para um comando DATA que 
ele já tenha lido, você deve usar o comando RESTORE. 

RESTORE faz com que o computador volte a ler os dados desde o primeiro 
comando DATA. RESTORE, seguido por um número de linha, faz com que o 
computador volte a ler desde o primeiro comando DATA nessa ou na linha que segue esse 
número. Assegure-se de que você colocou um número de linha válido após o RESTORE, 
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isto é, um que exista no programa. Execute o seguinte programa: 


10 READ A,B 

20 PRINT "A=";A„"B=";B 
30 RESTORE 
40 READ C r D 

50 PRINT "0~;C r "D=";D 
60 DATA 10, 20 

Você verá: 


A = 10 B=20 

C=10 D=20 




CAPÍTULO 13 


MANUSEIO DE DADOS E SUA ORDENAÇÃO 



No capítulo anterior, fizemos um programa de agenda telefônica; seria ótimo 
imprimir a agenda em ordem alfabética. Nós já vimos um método limitado de classificar 
listas em ordem numénea no Capítulo 6. Lntre tanto, o método seguinte é mais flexfvel. 
(Apesar de não ser o melhor modo, é um dos mais fáceis dc sc seguir.) Este método é 
chamado Método das Bolhas. 

Vamos considerar uma lista de nú meros a ser classificada: 

7, 4, 5, 10. 2, 8 

Nós queremos classificar esses números em ordem decrescente. 

Vamos comparar os dois primeiros números. Sc o número do lado esquerdo for 
menor que o do lado direito, então trocamos esses números entre si e comparamos o 
segundo e o terceiro números. Se os dois primeiros números já estiverem na ordem 
correta, devemos deixá-los como estão e comparar o segundo e terceiro números 
entre si. 

Desse modo, no nosso exemplo, primeiro comparamos o 7 com o 4. Esses dois 
estão na ordem correta, de modo que vamos comparar o 4 com o 5. 4 é menor que 5, 
então trocamos os dois de lugar entre si. Assim, temos: 

7, 5, 4. 10, 4, 2, 8 
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Agora comparamos o terceiro número com o quarto, isto é, 4 com 10. Trocamos 
outra vez os dois de lugar entre si: 

7 , 5 , 10 . 4 . 2 . 8 

Comparando o quarto com o quinto, eles ficam onde estão. Final mente, 
comparando o quinto número, 2, com o último. 8, nós os trocamos de lugar entre si, 
terminando com: 

7 . 5 . 10 , 4 . 8 , 2 

Bem, ainda não terminamos! Mas observe que o número menor já está no final 
da lista. Vamos ver o que acontece quando passamos a segunda vez: 


COMPARAR TROCAR? RESULTADO 


primV.scg. 

não 

7. 

5. 

10, 

4. 

8. 

2 

seg./ ter. 

sim 

7. 

10 , 

S. 

4, 

8. 

2 

Icr^qiiar. 

não 

7. 

10. 

5. 

4, 

8. 

2 

quar^quin. 

sim 

7. 

10, 

5, 

8, 

4. 

2 

qui-Ascx. 

não 

7. 

10, 

5. 

8, 

4, 

2 


No final da segunda passada, os dois menores números estarão em ordem no final da lista. 

O número máximo de passadas que serão necessárias para ter todos os números 
em ordem, de qualquer lista é, dessa forma, um a menos que o número total de itens a 
serem classificados, isto é, no exemplo dado. o número máximo de passadas requerido será 
cinco. De fato, freqüentemente, as listas são classificadas bem antes, pois os itens estão 
quase na ordem correta antes dc você iniciar a classificação. Dessa forma, é aconselhável 
verificar se a lista já está classificada no final de cada passada. 

Vamos classificar agora a agenda telefônica em ordem alfabética. A primeira 
parte lê os dados em uma matriz; a segunda parte classifica os dados em ordem alfabética e 
a terceira parte exibe os dados classificados. 
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10 REM LISTA TELEFÔNICA ORDENADA 
20 REM LE OS DATA E GUARDA NAS MATRIZES 
30 E=4 
40 N=E-i 

50 DIM N*<N>,NUM<N) 

60 FOR 1=0 TO N 
70 READ N*(I),NUMCI> 

80 NEXT I 
90 REM ORDENACAO 
Í00 h = N-l 
Í10 P=0 

120 FOR C=0 TO M 

130 IF N%<C>>N*<C+1> THEN SUAP NS ( C ) r N$ ( O í ) : SUAP NUM 
<C) ,NUM<C+1>= P=P + 1 
140 NEXT C 

150 IF PO0 THEN GOTO 110 

160 REM MOSTRA OS DADOS ORDENADOS 

170 CLS 

180 PRINT TAB < 2 > "NOME"TAB < 19 ) "TELEFONE" 

190 PRINT 
200 FOR 1=0 TO N 
210 LOCATE 2„4+I*2 
220 PRINT NKI> 

230 LOCATE 18, 4+1*2 
240 PRINT NUM< I ) 

250 NEXT I 

260 DATA EDUARDO , 2677668 , JOANA , 4326843 
270 DATA ANDRE * , 4781154 r CARLOS r 4781292 


A primeira e a última parte deste programa deve ser familiar a você (veja o 
Capítulo 12). 

As linhas 90 a 150 contêm a rotina de classificação. 

No início do loop, o contador, P. é zerado. A cada vez que o loop se completar, 
um elemento da matriz é comparado ao seguinte, N$(0) é comparado a N$(l). Se os nomes 
desses elementos não estiverem em ordem alfabética, os conteúdos desses elementos são 
trocados entre si. P é agora fixado em 1 , para indicar que uma troca já foi feita. 

Na última passada do loop N$(2) é comparado a N$(3). Os conteúdos desses 
elementos são trocados se necessário e o contador P. incrementado. 

A execução então continua na linha 150. Aqui o computador verifica o valor dc 
P. Sc qualquer um dos elementos foi trocado de lugar, P será maior que 0. O 
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computador assume que os nomes ainda não estão classificados e volta para a linha 1 10. P 
é zerado e o loop de classificação é executado outra vez. 

Se, na linha 150, P estiver igual a 0, o computador sabe que nenhum elemento 
foi trocado de lugar, indicando, dessa forma, que os nomes estão agora em ordem 
alfabética. Por isso, o computador continua com a linha seguinte do programa e exibe 
a agenda. 

Se você executar este programa, irá ver: 

NOME NÚMFRO 


ANDRÉ 4781 154 

CARLOS 4781292 

EDUARDO 2677668 

JOANA 4326843 

.Sc você quiser usar o mesmo nome de matriz duas vezes em um programa, mas 
com dados diferentes, apague a matriz antiga: 

ERASE N$ 

elimina todos os numes armazenados na matriz N$. Agora você pode usar a matriz N$ 
outra vez, e redimensioná-la usando um comando DIM. 

Sc, por algum motivo, vocc tiver uma variável chamada N$, ela não será afetada 
pelo comando ERASE. Entretanto, procure não usar variáveis e matrizes com o mesmo 
nome, pois pode causar confusão. 

Você pode ter matrizes multidimcnsionais com até 255 elementos! Por enquanto, considere 
uma matriz com apenas duas dimensões. Elas são muito úteis na classificação dc tabelas: 


DATA 

CRÉDITO 

DÉBITO 

SALDO 

30.06.84 

34,05 

10,00 

34,05 

05.07.84 


10,00 

24,05 

10.07.84 

120,00 


144,05 

12.07.84 


50,00 

94,05 

20.07.84 

200,00 


294,05 


62 


MSX - Guia do Programador 


Essas quaíro colunas de números podem ser armazenadas na matriz 
bidimensional, BANCO(4,3). Essa matriz é grande o suficiente para armazenar uma tabela 
composta por cinco linhas c quatro colunas c pode ser representada conforme o seguinte: 


BANCO(O.O) 

BANCCKO.t) 

BANCO(0,2) 

BANCO(0,3) 

BANCOd.O) 

BANCOU, 1) 

BANCOU ,2) 

BANCOU, 3) 

UANC(X2,0) 

BANCO(2.1) 

RANCO<2,2) 

BANCO(2,3) 

BANCO(3,0) 

BANCCX3.1) 

BANCO(3,2) 

BANCO(3,3) 

BANCO(4jD) 

BANCO(4,l) 

RANCO<4,2) 

BANCO(4,3) 


Como essa é uma matriz numérica, a data será armazenada como um número, por exemplo, 
300684. Cada entrada da tabela é armazenada em um elemento separado da matriz. A data 
300684 pode ser armazenada em BANCO<U,0) e o saldo final em BANCO(4,3). 

O programa seguinte mostra como colocar dados em uma matriz bidimensional. 
As quatro colunas da matriz são acessadas usando-se os valores de C = 0 a 3. O número 
de linhas depende do número de transações entradas; se houver T transações, então R 
assume o valor de 0 a T-l . Você insere a data de cada transação e a quantia creditada ou 
debitada, c o saldo dc cada transação é calculado e inserido na coluna quatro da matriz. Os 
totais de créditos, débitos e saldo são encontrados e inseridos na última linha da matriz. 

O cabeçalho da tabela é mantido em uma matriz de strings separada. Essa matriz 
não precisa ser dimensionada antes do uso, já que ela é uma matnz unidimensional e 
tem menos que onze elementos. Todas as matrizes multidimensionais devem ser 
DÍMensionalizadas antes do uso. 

Í0 REh BALANCETE BANCARTO 
15 REh LE OPERACOES DOS DATA 
20 CLS 

30 FOR C=0 TO 3 
40 READ OPER*<C> 

50 NEXT C 

60 REh ENTRADA DAS TRANSAÇÕES 
65 REh NUhA HATRIZ B IDIhENSIONAL 
70 INPUT "NUMERO DE TRANSAÇÕES" ? T 
80 DIM BANCO <T,3> 

90 N=T-i 
100 CLS 

Ü0 FOR C=0 TO 2 
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120 PRINT T AB < i 0*C ) OPER*<C); 

130 NEXT C 
140 FOR R =0 TO N 
150 FOR C=0 TO 2 
160 LOCATE 10*C,R+2 
170 INPUT BANCO < R r C ) 

180 NEXT C 
190 NEXT R 

200 REN CALCULO DO BALANCETE DEPOIS DAS TRANSAÇÕES 
210 BANCO< 0,3) = B ANCO ( 0 , 1 > -BANCO (0,2) 

220 FOR R=i TO N 

230 X=B ANCO < R , 1 ) — BANCO ( R r 2 > 

240 BANCO ( R r 3 > ■BANCO CR — i f 3)*X 
250 NEXT R 

260 REN CALCULO DO BALANCETE FINAL 
270 FOR R=0 TO N 

280 BANCOÍT , 1 >=B ANCO CR,i)+B ANCO (T r l ) 

290 BANC0<T F 2>=BANC0(R ,2) füANC0(T,2) 

300 NEXT R 

310 BANCO ( T . 3 ) = BANCO < R » 1 ) — B ANCO < T , 2 ) 

320 B ANCO ( T , 0 ) =B ANCO ( N r 0 ) 

330 REN MOSTRA O BALANCETE DO BANCO 

340 SCREEN 0 

350 WIDTH 40 

360 FOR C=0 TO 3 

370 PRINT T AB C i 0*C > OPER^<C)t 

380 NEXT C 

390 FOR R=0 TO N 

400 FOR C=0 TO 3 

410 LOCATE 10#C , R *2 

420 PRINT B ANCO ( R * C > 

430 NEXT C 
440 NEXT R 

450 PRINT " " 

460 FOR C=0 TO 3 

470 PRINT T AB ( 10*C ) BANCO ( T , C ) ; 

480 NEXT C 
490 END 

500 DATA FICHA, CR ED I TO , DEB I TO , BALANCETE 
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Se você inserir débitos ou créditos maiores que 999999.99, irá “bagunçar” a 
tabela, já que ela tem somente dez espaços de caracteres alocados para cada inserção. 

EXERCÍCIO 

1. Altere ligeiramente este programa de modo que você possa expressar a data na forma 
23.06.84 etc. Você irá precisar usar outra matriz de string; D1A$(T) será aceitável. 



CAPITULO 14 


MANIPULANDO STRINGS 



Existem muitas maneiras pelas quais você pode manipular strings. Até agora 
você só somou uma string a outra: 

PRINT "Bom ”+" dia” 

é impressa como: 

Bom dia 

Usando INSTR você pode procurar uma string específica dentro de uma string. 
Em um programa para um advcnturc*, você pode querer perguntar ao jogador para onde 
ele irá a seguir. O jogo pode seguir diferentes caminhos dependendo se o jogador digitar 
Norte, Sul, Leste ou Oeste. Esta listagem de parte de um programa mostra como isso pode 
ser feito: 

100 INPUT "PARA ONDE VAI ABORA?"|BS 

110 IF B*="NORTE" GOTO 200 

120 IF B%="SUL" GOTO 300 

130 IF B%="LESTE" GOTO 400 

Í40 IF BS="OESTE" GOTO 500 

150 PRINT "TENTE NOVAMENTE !" : GOTO 100 


Tipo de jogo no qual os participantes interagem cr>m o micro através de textos. 
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Entretanto, o jogador pode muito bem ter digitado uma sentença completa em resposta ao 
INPUT da linha 100, por exemplo, EU ESTOU INDO PARA LESTE. 

No entendimento do programa, isto significaria que nenhum dos caminhos 
poderá ser executado e o jogador será perguntado outra vez para onde ele está indo 
agora. Isso deve ser repetido até que uma palavra simples como “LESTE*’ seja inserida, 
fazendo com que o jogo demore muito mais. Muito melhor seria se o computador pudesse 
pesquisar a string inteira para reconhecer uma palavra dentro da string. Isso é exatamente 
o que a função INSTR faz. O exemplo seguinte irá mostrar como: 


100 INPIJT "PARA ONDE VAI AGORA^";B4. 

1Í0 IF INSTR ( BS r "NORTE" ) < >0 GOTO 200 
120 IF INSTR<B*,"SUL">< >0 GOTO 300 
130 IF INSTR <B*, "LESTE") < >0 GOTO 400 
140 IF INSTR (BI, "OESTE" ) < >0 GOTO 500 
150 PRINT "TENTE NOVAMENTE \ "s GOTO 100 


Na linha 110, a função INSTR pesquisa a string principal, B$, procurando a 
string “NORTE". Se a encontrar, é retomado o número correspondente à posição da 
primeira letra de “NORTE”, na string BS. Se LESTE não for encontrado, INST R retorna 
a zero. Desse modo. se B$ for: 

M EU ESTOU INDO PARA O NCRTE AGORA" 

então, INSTR(BS,“ NORTE”) retoma o número 22, já que a letra N de NORTE ocorre na 
vigésima segunda posição dc caractere. Para verificar, digite este pequeno programa: 

10 A=INSrH("tU ESTOU INDO PARA O NCRTE M , M NORTE“) 

20 PRINT A 

O número 22 deve ser impresso. INSTR sempre retorna um número, de modo 
que deve sempre ser comparada com variáveis numéricas. 

Seja cuidadoso ao incluir strings na função INSTR, dentro das aspas. Variáveis 
string já incluem aspas, sendo que elas devem ser colocadas de modo a permanecerem 
dentro da função INSTR sem aspas. 

Quando estiver pesquisando um string, você pode iniciar de qualquer ponto 
especificado: 


INSTRl I0,AS,B$) 
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Isso faz com que se inicie a pesquisa de BS em A$, a partir da posição do décimo 
caractere. 

Esse comando pode ser útil em um programa de Forca, ü programa seguinte 
pesquisa a palavra: 

CONSTANTINOPLA 
procurando a letra N 

10 AS="CONSTANTINOPLA" 

20 BS="N" 

30 C=0 

40 C«INSTR<Oi,A%rB%> 

50 IF C=0 THEN END 

60 PRINT "EXISTE UH NA POSICAO"C 

70 GOTO 40 

Neste programa, a expressão C+l foi usada para indicar onde a pesquisa deve 
começar. Na primeira vez que a função INSTR encontrar um “N’\ C - \ a pesquisa 
seguinte começa a partir da posição 4. Após ter sido encontrado o terceiro “N”. C = 10 e 
a terceira e ultima pesquisa começa na posição de caractere 1 1. Não existem mais “N”s, 
dc modo que C 6 zerado fazendo com que o programa termine na linha 50. 

Você receberá sempre um zero como retomo da função INSTR se tentar pes- 
quisar uma string maior dentro dc uma menor. 


INSTR ("dia", “bom-dia”) 


irá retomar um zero. 

Agora vamos ver três funções muito similares: 

RIGHTÍB, LEhíScMlDS 

Em primeiro lugar RJGHT5. Eis um exemplo de seu uso: 

10 A*=RIGHTS("QUE TEMPO FEIO ESTA LA FORA" ,4) 
20 PRINT AS 
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fornece: 


FORA 

Os cinco caracteres mais à direita foram retomados na variável string A$. 
Espero que vocè possa adivinhar o que LHFT$ faz! De qualquer modo, eis um 

exemplo: 


10 AÍ=LEFTÍ ("QUE TEMPO FEIO ESTA LA FORA", 10) 
20 PRINT Aí 


fornece: 

QUE TEMPC 
Finalmcnte M1D$: 

10 AÍ=MIDK"QUE TEMPO FEIO ESTA LA FORA". 11.17) 
20 PRINT Aí 


fornece: 


FEIO ESTÁ LA FORA 

O primeiro número na função MID$ fornece a posição de caractere para o 
primeiro caractere a ser retomado. O segundo número diz ao computador quantos 
caracteres devem ser retomados. Desse modo, no exemplo acima, os quatorze caracteres a 
partir da nona posição foram retomados dentro da variável AS. 

O número usado nessas funções deve estar entre 1 e 255. Como de qualquer 
forma você não pode ter uma linha maior que 255 caracteres, isso faz sentido. 

Sc o primeiro argumento numérico cm MTD$ for maior que o número de 
caracteres da string, então você irá receber como retomo uma string vazia. 

Mais uma vez, não se esqueça das aspas e nãu tente usar variáveis numéricas 
com essas três funções; você deve usar variáveis string já que são retomadas strings por 
essas funções. 
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EXERCÍCIOS 

1. Usando INSTR, encontre os resultados de: 

u) Pesquisa de uma string vazia ou nula, isto é, 
b) Pesquisa de uma string dentro de uma string vazia, 
r) Pesquisa de uma string vazia dentro de uma string vazia. 

2. Imprima as palavras existentes em Tem alguém aí?” separadamente. Você pode usar 
INSTR para descobrir a posição de cada palavra e sd então reutilizar MID$, ou usar 
RIGHT$, LEFT$ e MID$. 

3. Altere o último programa de modo que você possa separar as palavras de qualquer 
string que você inserir. 



CAPÍTULO 15 


FUNÇÕES 


Você já viu algumas funções, como por exemplo: 

INT Capitulo 4 

INSTR Capitulo 14 

LEFT$ Capitulo 14 

MID$ Caoítulo 14 

Falando de modo gerai, cada uma delas age da mesma forma. Você tem um 
objeto, chamado argumento, no qual o função age para produzir um resultado. Uma vez 
definida uma função, ela sempre produz os mesmos resultados e do mesmo modo se for 
fornecido um argumento aceitável: 

INT(X) 

Aqui, o argumento é X. O argumento de uma função 6 sempre incluído entre 
parênteses. O argumento, neste caso, pode ser um número, uma variável numérica ou uma 
expressão numérica. Se X estiver nos limites. INT sempre irá retomar o valor inteiro dc X 
arredondando para o valor inteiro inferior mais próximo. 

INT(7.9) Retorna 7. 

INT(— 2.3) Retoma -3. 
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Se você ficar confuso com certos nümeros negativos, veja os números da linha 

abaixo: 


... -6 —5-4—3-2—10 1 2 3 4 5 ... 

Os números estão arranjados na ordem crescente de tamanho, indo da esquerda 
para a direita. Com isso, você pode ver que -3 é o inteiro menor mais próximo de -2.3. 

Existe uma outra função muito similar a INT. chamada FIX. 

FIX também age sobre um argumento de número real paia retornar um inteiro. 
No caso dc números positivos, cia retoma o inteiro menor mais próximo da mesma forma 
que INT, mas para números negativos, ela retoma o inteiro maior mais próximo, ao 
contrário dc INT: 


riX(f».5) Retoma ' 5. 

HX(-2.2) Retoma -2. 

Vamos ver mais duas funções que também têm argumentos numéricos: A MS 

c SGN. 

SGN retoma o sinal do argumento: 

• Sc o argumento for um número negativo, a função retoma -1 

• Se o argumento for 0, a função retoma 0. 

• Sc o argumento for um número positivo, a função retoma +1. 

10 A=SGN(-402.2) 

20 PRirsT "SGN (-402.2) =";A 

fornece: 


SGN(-402.2)=-i 


Por outro lado. ABS é usada para converter números negativos em positivos. 
Números positivos não são alterados por esta função: 


10 A=ABS < —402-2 ) 

20 PRINT "ABS<-402.2>=~;A 




72 


MSX — Guia do Programador 


fornece: 


ABS(-402.2) =402.2 

O argumento de ambas as funções pode ser ou expressões ou variáveis: 
SGIM(4+3— 2) Retoma -1. 

ABS(num) Converte o conteúdo da variável num em um número positivo. 

Eis um pequeno programa para mostrar um uso possível para ABS: 


10 R EM ESTE PROGRAMA CALCULA A SUA IDADE 

20 INPUT "DAT A DE HOJE: hES , ANO" ; MH * AH 

30 INPUT "DATA DO SEU NASCIMENTO: MES F AN0";MN F AN 

40 HI=ABS < HH-HN > : IF HN> MH THEN MI=i2-MI 

50 AI=ABS(AH-AN) : IF MN>MH THEN AI=AI-1 

60 PRINT "UOCE TEM"; AI;" ANOS E";MI" MESES" 


Agora vamos ver duas funções que trabalham tanto com n lí meros como com 
string»: VAI. c STRS. 

Sc uma string contiver um número, VAI, irá retomar o número dentro de uma 
variável numérica, isto é, ela elimina as aspas e remove quaisquer brancos de dentro da 
string. Por exemplo: 

A-VALT 273”) 

PRINT “A=-;A 


fornece: 


A - 273 


Sc existir mais de um número dentro de uma string, VAL somente retoma o 
primeiro número e vai em frente. Por essa razão, VAL não avalia expressões dentro de 
string» : 


PRINT VAL( M 3+4=n 
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fornece: 


3 

Não sc esqueça de que, apesar do fato do argumento de VAL ser uma string, o 
resultado retomado por VAL é um número e deve ser colocado em uma variável numérica: 

A$=VAL(7i estáerraco 

VAL não consegue trabalhar com números embutidos entre letras em uma 

string; 

10 A=VAL< "ESTOU 1 ANO HA IS VELHO") 

20 PRINT A 

fornece; 

0 

A função inversa á VAL é STRS; cia converte um argumento numérico cm uma 

string: 

A$=*Eu tenho "+STR$(60i+'* anos hoc" 

PRINT AS 

fornece: 


Eu tenho 60 anos hoje 

Não se esqueça de que, apesar do argumento scr um número, o resultado 6 uma 
string, de modo que você deve retomá-lo em una variável string. 

No Capítulo 13 usamos uma Matriz Numérica, BANCO, para armazenar datas, 
créditos, débitos e saldos. Infelizroente. a data teve de ser inserida como um número, isto 
é, 240684 em vez de 24/06/84. Para insen-la da segunda forma, você tem dc armazenar as 
datas separadamente em outra matriz de string de modo que o programa use uma matriz 
numérica para as transações e duas matrizes dc string para cabeçalhos e datas. Usando 
STR$, todos os dados podem ser armazenados em uma matriz de string grande. Para isso, 
têm de ser feitas as seguintes alterações: 
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170 INPUT BANCO 

180 BANCOS (R,C) =STR$ ( BANCO ) 


Para calcular o novo saldo após cada transação, vocc dcvc avaliar as stnngs nas 
colunas dos débitos e créditos usando VAL e então converter a resposta de volta às 

strings: 

210 BANCOS C0 r 3)=STRS< VAL<BANCOSC0 r 1) >-VAL (BANCO*<0, 2)) 

) 

Talvez você queira voltar atrás e alterar o programa de SALDO BANCÁRIO! 

Uma última função que atua sobre strings é LEN. LEN retorna o comprimento 
da string fornecida no argumento: 


10 AS= // CONST ANTINOPLA" 

20 A=LEN ( AS ) 

30 PRINT "O COMPRIMENTO DA PALAVRA "AS" E w DE "A" CARA 
CTERES" 


Outra vez, observe que, apesar da funçáo atuar sobre uma string, cia sempre retoma um 
número, de modo que você deve comparar essa função com variáveis numéricas. 

Finalmente, uma função um pouco diferente: RND. RND gera um número 
aleatório dc 14 dígitos entre 0 e I. Dc fato, os números gerados não são rcalmcntc 
aleatórios já que seguem uma string fixa. Entretanto, essa string é tão longa que, 
para todos os propósitos, vocc pode considerar que os números gerados são realmente 
aleatórios. 


Você pode ter três tipos de argumentos com RND*. 

Se o argumento for positivo, o número gerado por RND dentro de um programa 
é o seguinte na string. O ponto no qual a string é inserida é sempre o mesmo, e ele é 
estabelecido pdo computador no final do programa. Digite: 


10 PRINT RND(i) 
20 PRINT RND< 1 ) 
30 PRINT RND(i) 
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Você irá obter a seguinte string a cada vez que o programa for executado: 

.59521 943994623 
. 1 0658628050 1 58 
.76577651772823 

Alterar o argumento para um número positivo diferente não irá produzir 
qualquer efeito. 

Sc o argumento for zero, o número aleatório gerado 6 o mesmo que o último. 
For exemplo: 

10 X=RND<i)+RND(l> 

20 PRINT " O SEGUNDO NUMERO ALEATOR IO GERADO E"'RND<0> 

30 PRINT " 0 PRIMEIRO NUMERO ALEATORI IO GERADO E F, 'X-RN 
D<0> 


Se o argumento for negativo, o lugar na string na qual os números aleatórios são 
detectados é definida pelo argumento negativo: 


10 A=RND< - 3 ) 
20 B=RND< 1 ) 
30 PRINT A , B 


fomccc a string: 

.34389820420821 

.29624868166920 


a cada vez que o programa for executado. Agora substitua -3 por -4. Você irá obter uma 
string diferente. Alterando o argumento positivo, não irá produzir outra vez qualquer 
resultado. 


Um número aleatório entre 0 e 1 não tem muita utilidade. É preferível ter um 
número aleatório entre 1 e 6. Por exemplo, este programa simula lançamentos de dados: 

10 REh AREMESSO DE DADOS 
20 A* I NT ( 6*R ND ( 1 ) ♦ 1 ) 

30 PRINT "SAIU O NUMERO" A 
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Entretanto, você irá obter o mesmo número a cada vez que o dado for lançado. 
Se você quiser obter um número aleatório diferente a cada lançamento, coloque a linha: 

5 RDRST =RND(-TIME) 
no início do programa. 

A função TIME retorna o valor do relógio interno do computador. Ao se ligar a 
máquina, o relógio é posicionado em 0, mas é incrementado a cada 1/60 segundos, isto é, 
TIME será igual a 60 quando tiver passado um segundo. Desse modo, usando TIME como 
argumento de uma função RND, irá resultar em uma string de números aleatórios sendo 
lidos em pontos diferentes a cada vez que a função RND for encontrada no programa. 

Você pode ver como usar esta última função no jogo da Forca? O programa 
pode ler este tipo de estrutura: 

1. Carregue uma matriz com as palavras contidas em comandos DATA. 

2. Escolha aleatoriamente um dos elementos (palavra) da matriz. 

3. Uma vez lida a sua palavra, informe o seu comprimento ao jogador, usando 
EEN. 

4. Peça ao jogador para adivinhar uma letra. 

5. Usando INSTR, verifique se a letra existe na palavra (veja o Capítulo 14, 
caso você tenha se esquecido como fazer isso). 

6. Conte as tentativas que o jogador fez. 

7. Se o jogador n9o conseguir adivinhar a palavra em dez tentativas, termine o 
programa. O computador venceu. 

8. Pergunte ao jogador sc clc deseja jogar outra vez, usando INKEYS. 


EXERCÍCIO 


1. Escreva o programa do jogo da Forca. 



CAPÍTULO 16 



DEFININDO AS SUAS PRÓPRIAS FUNÇÕES 


i 


Vamos ver algumas funções definidas pur nós mesmos, deixando um pouco de 
lado as definidas pelo computador. Isso pode ser feito usando DEF FN. 

Uma vez definida uma função, você pode usá-la em qualquer parte do programa. 

Em primeiro lugar, vamos ver um exemplo matemático. 

Suponha que você queira definir uma função que calcule o quadrado de um 
numero, isto é, eleve esse número à potência de dois, que é a mesma coisa que multi- 
plicá-lo por si próprio. 

Vamos chamar a essa função QUADRADO e defini-la como: 

10 DEF FNCUADRADO(X)=X A 2 

Observe que o nome da função vem logo após o comando DEF FN. 

X é chamado “parâmetro fictício”. Você somente o usa para mostrar o que a 
função faz. Quando usar essa função, você deve substituir o parâmetro fictício pelo 
parâmetro real. O parâmetro real tem de ser do mesmo tipo do parâmetro fictício. No 
exemplo dado, o parâmetro real pode ser ou uma variável numérica ou um número. 
Quando definir a função, o parâmetro fictício usado na definição deve ser listado dentro 
dc parênteses após o nome da fiinçãn. 
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Vamos usar essa função para calcular o quadrado de 13 e colocá-lo na variável 
R. Para isso, usamos o comando FN, seguido pelo nome da fiinçãn e então pelo parâmetro 
real entre parênteses: 

R=FNQUADRADO(13) 


Ao examiná-lo, o computador irá procurar a definição da função QUADRADO. 
Ao cncontrá-la, toda a definição de X é substituída por 13, o resultado é calculado e 
colocado na vanável R. 

X 6 também chamado variável local. Isto significa que cia 6 somente 
reconhecida localmente, isto é, dentro da função: 

10 X=4 

20 DEF FNQUADRAD0<X>=X A 2 
30 R=FNQUADR ADO < 12 ) 

40 PRINT "R="R"X="X 


fornece: 


R=144 X=4 


Você pode usar mais de um parâmetro em uma função. Todos os parâmetros 
usados devem ser listados na definição, com os parâmetros separados por vírgulas. 
Quando chamar a função, você deve passar o mesmo número de parâmetros reais da 
função que os parâmetros fictícios usados na definição. Você também deve passar o tipo 
correto de parâmetro, isto é, um número ou variável numérica para um parâmetro numérico 
fictício. 

O programa seguinte irá elevar qualquer número à potência de outro número, 
sendo ambos os números passados na definição da função: 


20 DEF FNELEVA<X,Y>«X A y 
30 INFUT "BASE "|A 
40 INPUT "EXPOENTE "*B 
50 R “FNELEVE < A r B > 

60 PRINT A" A "B"="R 


A definição deve estar contida em uma linha de programa 
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Agora vamos ver um exemplo usando strings. Essa função troca o primeiro 
caractere de uma função; 

10 DEF FNST*< AS)=RIGHTS(AS,LEN< A$)-í ) 

20 INPUT "STRING=";S% 

30 PRINT S*„FNST%<S%> 

Como essa função retoma uma string, o nome da função deve terminar com o 
sinal S. Qualquer nome de variável válido é aceitável como nome de função. 


EXERCÍCIO 

1. Defina uma função que corte os dltimos quatro caracteres de uma string. 
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ESTRUTURANDO O SEU PROGRAMA 


Em um programa, frcqücntcmcntc você pode se encontrar em situações em que 
deseja executar a mesma tarefa muitas vezes, em diferentes pontos de seu programa. Se 
vocc descobrir que 6 necessário repetir uma linha de programa muitas vezes, é 
aconselhável colocar essa linha no que é chamado " sub-rotina Quando você precisar 
dessa linha cm seu programa, você salta para a sub-rotina, usando o comando GOSUB. 
Quando todas as Unhas da sub-rotina tiverem sido executadas, você retoma ao programa 
principal. Uma sub-rotina pode conter tantas linhas de programa quantas necessárias. No 
exemplo seguinte, a sub-rotina está entre as linhas 100e 130: 


10 CLS 

20 PRINT "VOCE GOSTA DE MIM?" 

30 GOSUB 110 

40 PRINT "VOCE hE ACHA INTELIGENTE?" 

50 GOSUB 110 

60 PRINT "VOCE HE ACHA BONITO?" 

70 GOSUB 110 

80 PRINT "VOCE SO ESTA DIZENDO ISSO PARA ME AGRA-OAR! 
90 END 

100 REM SUB-ROTINA 

110 INPUT "SIM ou NAO ":SN* 

120 IF SN4=»"NA0" OR SN$="nao" THEN PRINT "OK. ENTÃO EU 
VOU EMBORA. "sEND 
130 RETURN 


80 


Estruturando o seu programa 


81 


Observe o comando RETURN no final do programa. Isso é muilo importante, 
pois ele diz ao computador para retomar ao programa principal. A execução continua a 
partir da primeira linha apds a linha que contém o comando GOSUB. 

É conveniente colocar um comando REM exatamente antes da sub-rotina para 
distingui-la do programa principal. Entretanto, não use o número dc linha do comando 
REM para chamar a sub-rotina, pois, se mais tarde você vier a apagar os comandos REM, 
irá receber uma mensagem de erro. 

Assegure-se de que o computador não execute a sub-rotina por acidente, 
colocando um comando END no final do programa principal, exatamente antes das 
sub-rotinas. 

Outro uso para o comando GOSUB é com o comando IF...THEN...ELSE. Esse 
comando tende a se tomar longo e complicado; a maneira mais fácil de simplificar esse 
comando é usando uma sub-rotina. 

O pequeno programa a seguir pede dois números positivos diferentes. O 
comando IF...THEN...ELSE é usado para testar esses números. Se eles forem diferentes e 
positivos, o seu produto e soma são impressos. De outra forma, você será solicitado a 
tentar outra vez: 


10 INPUT '"DOIS NUMEROS POSITIVOS DIFERENTES"" ? A r B 

20 IF A=B OR A<0 OR B<0 THEN PRINT "TENTE DE NOVO!" EL 

SE GOSUB 100 

30 GOTO 10 

90 REM SUB-ROTINA 

100 PRINT "A=" ;A r "B -" ; B 

110 PRINT "'A+B="'?A+B 

120 PRINT "AxB=";A*B 

130 RETURN 


O programa é ligeiramente mais longo, mas muito mais fácil de ser lido. 




CAPÍTULO 18 


DESVIOS CONDICIONAIS 



Em determinado ponto vocé pode descobrir que deseja ter um programa 
principal ou programa de menus, que ofereça um número de opções. Por exemplo, as 
primeiras linhas de um programa de menu podem fazer com que as seguintes linhas sejam 
exibidas na tela: 


• MCSU 

1. Exibe a aqenda tele'ònica. 

2. Inclui novas enfadas na agenda. 

3. Remove entradas da aqenda. 

4. Termina n programa. 


A parte seguinte do programa pode se parecer com esta: 
100 A$ = INKEYS 

120 IF A$- T THEN GOSUB 1030 
130 IF AS="2" THEN GOSUB 2030 
MO IF A$-r'‘3” THEN GOSUB 3000 
1ÍÍ0 ir A5=”4" IHLN GOSUB 4030 
160 GOTO 130 


A linha 160 foi incluída para o caso de outra tecla diferente de 1, 2, 3 ou 4 ser 
pressionada. 
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Existe uma maneira mais curta dc escrever um programa, usando ON GOSUB. 
Usando este comando, você pode saltar para qualquer numero de sub-rotina que quiser. 
No exemplo anterior, queremos saltar para uma das quatro sub-rotinas após a palavra 
GOSUB: 

ON... GOSUB 10C0, 2000,3000,4000 

Agora temos de fazer o computador saber para qual sub-rotina saltar. Isto é feito 
colocando um número ou expressão após ON e ames de GOSUB. Se a expressão for igual 
a 1, o computador salta para a primeira sub-rotina listada após GOSUB; sc for igual a 2, 
para a segunda sub-rotina, e assim por diante. 

Agora podemos substituir as linhas 100 a 160 por: 

ICO A$=INKEYS 
1 10 A=VAL(A$) 

120 ONA GOSUB 1 000,2:00,3000,4000 
130 GOTO 100 

Observe que a string A$ foi alterada para a vanável numérica A, antes de usá-la no 
comando ON... GOSUB. De outra forma, iria causar um eiro, pois somente variáveis 
numéricas podem seguir ao comando ON. 

Ao terminar a sub-rotina, o computador retorna para a linha 13U. 

Sc a variável numérica A contiver um número real, por exemplo, 2.9, o 
computador pegará o valor inteiro menor e saltará para a segunda sub-rotina. 

ON...GOTO trabalha da mesma fornia que ON.. .GOSUB. Neste caso, o 
computador salta para o número dc linha na lista que corresponde ao número que segue ao 
comando ON. A execução do programa continua a partir desse número de linha: 

10 INPUT "1, 2 ou 3";A 
20 ON A GOTO 370,420.10 

Desse modo, se: 


A= I A linha seguinte a ser executada é a 370. 
A=2 A linha seguinte a ser executada é a 420. 
A=3 A linha seguinte a ser executada é a 10. 


lista. 


Observe que os números de linha não precisam estar na ordem numérica na 




CAPÍTULO 19 


FUNÇÕES MATEMÁTICAS 


l 



Se você não tiver muita experiência com funções matemáticas e achar que este 
capítulo é um pouco difícil, não hesite em pular para o seguinte 

liste capítulo trata das funções matemáticas: 

A , SOR 

TAN, SIN, COS e ATN 

EXPeLOG 

Você já sabe como elevar um número a uma potência usando o sinal: 

4 A 2 = 16 (ou escrito na forma usual 4 7 = 1 6 > 

Geralmente, a elevação de um número n, a uma potência p, é o equivalente a 
multiplicar n por ele próprio, p vezes. No exemplo anterior, n = 4, p = 2. Desse modo 
4 A 2 é equivalente a 4*4. 

A função raiz quadrada, SQR, encontra a raiz quadrada de um númeio. Isso é u 
inverso de elevar um número à potência de dois. ou elevá-lo ao quadrado. 

Se você elevar 5 ao quadrado, isto é, 5 A 2, você obtêm 25. Para tirar 5 dc volta 
a 25, você usa a função raiz quadrada: 


Í0 A=SQR<25) 

20 PRINT "A raiz quadrada de 25 «?"? A 
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obtendo: 

A rai 7 otiadrada de 25 é 5 

O argumento da função SQR deve ser ura nümero positivo ou uma expressão 
que resulle um número positivo. (O computador não pode manusear números imaginários!) 
Eis alguns pontos para se pensar a respeito: o que acontece se você elevar um número a 
uma potência negativa? É fácil descobrir. Digite: 

PRINT 4 A -1 

Você irá obter: 

.2b 

que é igual a 1/4, de modo que, geralmenie: 
n A p ■ 1/n A p 

Vamos ver o que acontece se um número for elevado à potência de um número 
decimal, ou fração. Digite: 

PRINT 4 A 0.5 

fornece a resposta 2. 

4 A 0.5 ê o equivalente a 4 1 * 

de modo que, geralinente: 

n A l/p fornece a você a raiz p ce n 

No exemplo, n - 4, p = 2, você obtém a raiz quadrada de 4, que é 2. Desse modo, 
elevar um número à potência de meio é o equivalente a se obter a raiz quadrada do 
número. 

SIN, COS, TAN e ATN são funções trigonométricas. 



86 MSX - Guia do Programador 

Os argumentos dessas três funções devem ser ângulos. Provavelmente você 
pensa em ângulos em termos de graus: 


eixo Y 



Um círculo completo tem 360\ O ângulo de um círculo é medido a partir do 
eixo X, que corta o círculo com uma linha traçada a partir da posição das nove horas para 
a posição das três horas, no sentido anli-horário. O eixo Y corta o circulo a partir da 
posição das doze horas para a posição das seis horas. O ângulo entie esses dois eixos é, 
dessa forma, 90°. 

Entretanto, o computador mede ângulos de forma ligeiramente diferente. Para 
entender, vamos considerar um círculo com um raio de uma unidade. O tipo dc unidade 
não importa aqui; pode ser 1 mm, 1 m, 1 km, qualquer uma. 

A circunferência do círculo é dada pela fórmula: 

C=2«PIt C = Circunferência. 

PI é um número especai usado em matemática, nue inicia com 3,1415926... 

PI é a letra grega “p" e ê pronunciada PI. 

r é o raio do círculo. 

Dessa forma, para o nosso círculo, como r— 1: 


C = 2-Pl 




Funções matemáticas 


87 


Examinando por outro ângulo, podemos dizer que a circunferência de nosso 
círculo tem 2*PI radianos. Dessa forma: 

2» PI radianos é equivalente a 3B0 J . 

Assim, em radianos. o ângulo entre o eixo X e o eixo Y é PI/2. 

Sc, agora, nós tivermos um ponto sc movendo ao longo do nosso círculo, 
podemos usar as funções COS e SIN para descobrir onde o ponto está: 

eixo Y 



a unidades 


eixo X 


A um certo tempo, o ponto pode estar na posição P, para onde ele sc moveu, 
através de um ângulo a partir do eixo X; ou, se você preferir, ele se moveu uma distância 
de "a” unidades ao longo da circunferência. 

Se desenharmos linhas tracejadas verticais c horizontais a partir dc P, para cortar 
os eixos X e Y, podemos descobrir a posição das intersecções nos eixos X e Y usando 
COS e SIN respcctivamcnte: 

X - COS(a) COS fornece o cosseno do ãnçulo a. 

Y - SIN(a) SIN fornece o seno do ângulo a. 

Quando medimos ao longo do eixo X, consideramos X positivo se estivermos no 
lado direito do eixo Y e X negativo quando estivermos do lado esquerdo do eixo Y. 
Desse modo podemos dizer: 

• O cosseno de qualquer ângulo entre ü e PI/2 é positivo. 
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• 0 cosseno üe qualquer ângulo entre PL/2 e 3*PI/2 é negativo. 

• O cosseno de qualquer ângulo entre 3*P172 c 2PI é positivo. 

Isto é, paia o COS: 

Pl'2 


/cosseno 
1 Negativo 

Cosseno^^ 
Positivo | 

\ Cosseno 
\ Negativo 

Cosseno / 
Positivo J 


3/2- PI 

Quando medimos ao longo do eixo Y, Y 6 positivo sc estiver acima do eixo X c 
negativo quando abaixo. Desse modo podemos di/er: 

• O seno de qualquer ângulo entre 0 e PI é positivo. 

• O seno de qualquer ângulo entre PI e 2*P1 é negativo. 

Isto é, para SIN: 


PI/2 



3/2* PI 
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Se quisermos andar ao longo do círculo mais de uma vez, COS c SIN têm os 
mesmos valores que da primeira vez: 

SIN(a+2-Pl)=SIN(a) 

COS(a+?.PI)=COS(a) 

A tangente de um ângulo é dada por: 

TAN(a)=S!N(a)/COS(a) 

Dada a tangente dc um ângulo, podemos descobrir o ângulo usando ATN (que é 
conhecida por c o- tangente). ATN é o inverso da função TAN. 

a-ATN(O.fi) 

retorna o ângulo cuja tangente é 0.6 na variável a. O ângulo é retomado em radianos. 

O computador náo conhccc as funções inversas de COS e SIN, mas você pode 
facilmente defini-las como suas próprias funções usando: 

ARCSIN(a)=ATN(a/SQR(-a«a+ 1)) 

AHCCOS(a)=-ATN(aySQR(-a-a 1 1J)+PI/2 

Outro mímero frequentemente encontrado cm matemática 6 representado pela 

letra e. 

Para ver os primeiros 14 dfgitos desse nümero, digite: 

PRINT EXP(1) 


Você irá ver: 


?.71R?81fi2B45fía 

A funçáo EXP é definida por: 


EXPix)=c A x 
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de modo que: 

EXP(i»=e 

O inverso dessa função é dado pela função LOG. Essa função fornece o 
logaritmo na base e do argumento, isto é, ele fornece o logaritmo natural de um número 
que freqüentemente é escrito ln. 

EXP(X)=e A x=n 

LOG(n)=x 


Você usará com mais frequência logaritmos na base 10. Para se obter logaritmos 
na base 10, use a seguinte identidade: 

lsg10(x)=LOG(x)/LCG'10) 


EXERCÍCIOS 

1. Defina uma função cliamada PI, que retorna o valor de PJ. Use a identidade: 

PI=ATN( 1*4) 

2. Defina uma função que converta graus cm radianos. Use a fórmula: 
a rariianos=(a-PI)/180 graus 

Você terá de usar 3.14... para o PI. Altemativamente. use a função Pl. 

3. Defina uma função que forneça o ARCCOS de seu argumento. Não se esqueça, 
-1 < = COS(a) < = I para qualquer ângulo de “a” radianos. Desse modo, o valor de 
sua função somente funcionará para argumentos entre +1 e -1, inclusive. 

4. Defina uma função que retome o logaritmo na base 10 de seu argumento. 



CAPÍTULO 20 



O CÓDIGO ASCII 


No Capítulo 6, você descobriu que as letras de A a Z e de a a z são armazenadas 
dentro do computador como números entre 65 e 90 e 97 e 122, rcspcctivamente. Esses 
números são chamados Códigos ASCII. 

ASCII significa American Standard Codc for Information Interchanue (Código 
Americano Padrão para Intercâmbio de Informações), e 6 comiimcntc usado pelos 
computadores para representar caracteres. 

Se você quiser descobrir os códigos ASCII para um caractere, você pode usar o 
comando ASC. Por exemplo: 

10 Ai«ASC<"A"> :A2=ASCC"a") 

20 PRINT "O cudigo ASCII de A e"sAl 

30 PRINT "O codigo ASCII de a e"sA2 

O argumento da função ASC deve ser uma string; se mais de um caractere 
estiver contido na string, o computador retorna o código ASCII do primeiro caractere. 

O oposto ao comando ASC é CHRS. Quando fornecido um argumento aceitável, 
CHR$ retoma o caractere ASCII correspondente, em uma string. Por exemplo: 

10 A1$=CHR* (65) :A2S=CHRS<97> 

20 PRINT "O caractere correspondente ao codigo do A 

SCII e " 5 A 1 5 

30 PRINT "O caractere correspondente ao codigo 97 do A 

SCII e “:A?t 


w 
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Os outros caracteres do teclado também têm códigos ASCII. Encontre os 
códigos ASCII para e “7”. 

De fato, existem 256 códigos ASCII ao todo, entre 0 e 255. 

Você pode usar CHR$ para descobrir caracteres associados com os códigos 
entre 32 e 255 inclusive. Execute o seguinte programa para descobrir esses caracteres: 


10 REH Caracteres ASCII =32-255 
20 CLS 

30 FOR 1=32 TO 255 
40 PRINT CHR%(I)+" 

50 NEXT I 


Você verá todos os caracteres alfanuméricos como também a maioria dos 
caracteres gráficos. Observe que o último caractere, que é representado pelo código 255, é 
dc fato o cursor; dessa forma, cie muda à medida que você move o cursor sobre o texto 
da tela. 


Os códigos entre 0 e 31 são um tanto especiais. 

Esses códigos são chamados códigos de controle. Em vez de representar um 
caractere, eles representam uma operaçáo, que pode ser executada pelo computador 
quando o código for usado como argumento em um comando PRINT CHR$. 

Você já viu o código de controle 13 no Capitulo 8. Fazendo um PRINT CHRS 
vimos que era o equivalente a pressionar <RETURN>. Essa 6 a única maneira como 
< RFTI JRN> pode ser usado dentro de um programa. 

Outros códigos de controle movem o cursor ao longo da tela, limpam a tela, etc. 

Tente executar o seguinte programa: 

10 REM alguns Codigos de Controle ASCII 

20 PRINT CHRt( 12)+"Cod iqo de Controle 12 limpa a tela. 
30 PRINT CHR*<7)+"Cod igo de Controle 7 emite BEEPs - " 

Os códigos dc 0 a 31 são também usados para representar o restante dos 
caracteres gráficos. Entretanto, para acessá-los você deve usar PRINT CHR$(1) em 
primeiro lugar e então CHRS(A+64), onde A é o número do código. O programa seguinte 
imprime os 32 primeiros caracteres gráficos: 
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10 RE* Codiqos 0-31 : ma «s Caracteres Gráficos 
20 FOR A=0 TO 3 i 

30 PRÍNT CHH1(Í)+CHR5(A+6‘I)+" "? 

40 NLXT A 

A função STKING$ é usada para imprimir uma stnng de um dado tamanho e 
constituída por um ou outro caractere específico. A string não pode exceder a 200 
caracteres, a menos que vocc use primeiro um comando CLEAR. 

STRINGS deve ser seguida por dois argumentos, separados por uma vírgula 
e incluídos entre parênteses. 

O primeiro argumento deve ser um número, expressão numérica ou variável 
numérica- Isso especifica o tamanho de uma string. 

O segundo argumento pode ser ou um número ou uma string. Se um número for 
usado, pode ser o código ASCII do caractere a scr impresso na string. Por exemplo: 

10 FOR B“1 TO 10 
20 AS=STRIMGS<B ,42> 

30 PPINT Ai 
40 NEXT R 

fornece o padrão: 

* 

** 

*** 

**** 

***** 

****** 

******* 

******** 

********* 

********** 

Se o segundo argumento for uma string, então o primeiro caractere dessa string é 
usado, isto é, se a Linha 20 fosse substituída por 

* 

20 A$=STRING$(B,V) 


o efeito seria o mesmo. 



CAPÍTULO 21 


MODOS DE TELA 



Até agora você viu somente os modos de tela de texto 0 e 1. De tato existem 
mais dois modos de tela: o 2 e o 3. Iremos usá-los nos capítulos seguintes. Em primeiro 
lugar, um resumo das características dc cada modo de tela. 


OS MODOS DE TELA DE TEXTO (SCREEN 0 E 1) 


Você pode alterar a largura de ambos os modos de tela usando o comando 
WIDTH (veja o Capítulo 9): 


MODO DE 

LARGURA 

LARGURA 

TAMANHO 

TELA 

PADRAO 

MÁXIMA 

DF. CAR ACTERE 

SCREEN 0 

37 

40 

6x8 

SCREEN 1 

29 

32 

8X8 


Ambos os SCREENs contêm 24 linhas de texto. Apesar de você poder colocar 
mais caracteres dentro do SCREEN 0 que no SCREEN I, o espaço alocado para cada 
caractere é menor. Apenas 6x8 pontos (ou pixels como também são chamados) 
são usados para cada caractere no SCREEN 0, enquanto são usados 8x8 pontos no 
SCREEN 1 . Isto significa que os caracteres alfanuméricos aparecem mais comprimidos no 
94 
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SCREEN 0 que no SCREEN l, pois as últimas duas colunas de pontos nos quadrados de 
8x8 pontos usadas no SCREEN 1, são deixadas em branco e são essas duas colunas que 
estão faltando nas posições de caractere do SCREEN 0. A compressão das posições de 
caracteres é mais óbvia quando se comparam caracteres gráficos. 

Ao se ligar o computador, um desses SCREEN s de texto é o SCREEN 

padrão. 

O MSX 6 capaz dc produzir 16 cores (veja o Capítulo 22 para mais detalhes). 
No SCREEN 1 você pode definir as cores de texto, tundo e das margens para qualquer 
combinação dessas 16 cores. Você não pode ter mais de uma cor de texto ao mesmo 
tempo. As cores padrões no Expert, são: 

TEXTO: BRANCA 

FUNDO: PRETO 

MARGENS: PRETO 

(No HOT-BIT, a cor do fundo o da moldura ô azul-escuro e a cor das letras é branco.) 

No SCREEN 0 você somente pode definir as cores de texto c dc fundo, sendo as 
cores padrões as mesmas vistas acima. 

Sc cm qualquer ponto vocè alterar a cor de texto, lodo o texto do modo de 
tela muda de cor. 


MODOS GRÁFICOS DE ALTA RESOLUÇÃO (SCREEN 2 E 3) 

O SCREEN 2, é o modo gráfico dc tela de alta resolução. 

Ele tem 256 pontos dc largura por 192 de comprimento. Cada ponto pode ser 
manipulado nesse SCREEN. O ponto do canto superior esquerdo está na posição de 
coordenada (0,0), e o ponto do canto inferior direito na posição (255,191): 

SCREEN 2 

0 255 

C 
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Você não pode mudar a largura deste SCREEN. Se você emitir um comando 
WIDTH enquanto estiver no SCREEN 2, o computador irá lembrá-lo disso c, ao retomar 
para o modo de tela de texto, irá definir a largura como estava defmida no SCREEN 2. 

Você pode ter digitado: 

SCREEN 2 <RETURN> 

enquanto estava no modo direto c ser surpreendido por nada ter sido alterado. Isto ocorre 
devido au fatu de você não poder acessar modos gráficos de tela no modo direto. Você 
deve incluir o comando SCREEN em um programa para poder examinar modos gráficos 
de tela, isto é, 

10 SCREEN 2 

20 GOTO 20 

A linha 20 congela o modo gráfico de tela; isto é necessário pois o computador 
retoma imediatamente para o modo de texto padrão ao completar a execução de um 
programa. Ela também irá retomar para o modo de tela de texto ao encontrar um comando 
INPUT em um programa, ou um erro. 

Para parar este programa c retomar para o modo de tela de texto, pressione 
<CTRLxSTOP>. 

Os pontos no modo de tela são agrupados em grupos com 8 pontos consecutivos 
na horizontal. O primeiro grupo vai das coordenadas (0,0) a (7,0). 

Um gmpo 8 x I pontos: 



Cada grupo dc 8 pontos pode conter somente duas cores, uma cor de texto e 
uma cor de fundo. Linhas adjacentes podem conter duas cores diferentes. A resolução de 
cores deste modo de tela é 32 x 192. 

Para imprimir caracteres nesse modo dc tela, veja a seção avançada, Capítulo 
14. Você não pode usar o comando PRINT diretamente. nos modos gráficos. 
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O MODO DE TELA DE MÚLTIPLAS CORES (SCREEN 3) 


O SCREEN 3 é o SCREEN de múltiplas cores c pode ser usado para gráficos 
de baixa resolução. 

Da mesma forma que o SCREEN 2. ele tem 256 pontos de largura por 192 dc 
profundidade, mas você não pode manipular cada ponto desse modo de tela: 


SCREEN 3 

0 255 

0 | 


191 I 

O menor ponto que você pode desenhar nesse modo de tela é um bloco de 
4x4 pontos. Você pode ainda desenhar pontos na coordenada (0,0), mas irá descobrir 
que o bloco que aparece na tela também cobre os pontos (1,0), (2,0), (3.0) e t. 3 ,3). 
Dessa forma, ao se desenhar (3,3) o efeito seria o mesmo. 

Um bloco dc 4 x 4 pontos: 



Cada bloco 4x4 pode conter somente uma cor, a cor do texto. Dessa forma, a resolução 
de cor desse SCREEN é de 64 x 48. 

Da mesma forma que o SCREEN 2, você não pode acessar esse SCREEN no 
modo direto; você precisará congelar o SCREEN usando um loop infinito. Um comando 
INPUT ou um erro irá forçar você de volta para o modn de tela de texto padrão. 





Ao ligar o computador, são estas as cores que aparecem no modo de tela: um 
fundo preto com uma margem preta. O primeiro plano, ou texto, c branco. (No HOT-B1T a 
cor do fundo e da moldura é azul-escuro e a das letras é o branco.) 

Você pode alterar qualquer uma dessas cores usando o comando COLOR. 

Após ter recebido o comando COLOR, o computador espera por três numeros 
separados por vírgulas. O primeiro número define a cor do texto, o segundo, a cor do 
fundo e o último a cor das margens. Existem 16 cores para você usar: 

0 Transpa r ente 

1 freto 

2 Verde-médio 

3 Verne-elflío 

4 Azul-escuro 

5 Azul-nécio 

6 Verrnelhe-esccro 

7 Azul-claro (ou cian) 

8 Vermelhc-médio 

9 Vcrmclhc-c aro 

10 Amarelo-escuro 

1 1 Amarclo-claro 

12 Verrie-escuro 

13 Roxo 

14 Cinza 

1 5 Brancc 


9,9 
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de mudo que a cor padrão é: 

COLOR 15,1,1 no F xpert e COLOR 15,4,4 no HOT-BIT 

Para voltar às cores iniciais, basta pressionar F6. 

A tecla F1 está definida para imprimir COLOR no modo de tela. 

Você não precisa digitar todos os três numeros para o texto, fundo e margens 
quando estiver usando COLOR. Forneça somente um código de cor para aquela que vocc 
quiser alterar. Por exemplo: 

COLOR 1 

define a cor do texto como preto, deixando a cor do tundo c das margens como estão. 
COLOR, 15. 15 

A cor do fundo e das margens são definidas para branco, mantendo a cor do 
texto preta. Observe que, apesar da cor do texto não ter sklo especificada, a vírgula que a 
segue deve ser escrita, pois ela diz ao computador que o nrtmcro seguinte define o 
fiindo. 


coton „io 

O comando acima define as margens para amarelo-escuro. 

Você precisa estar no modo de tela (SCREEN) 1, 2 ou 3 para notar isso, pois o 
modo de tela 0 não tem margens. 

Se você alterou a cor de fundo enquanto estava em qualquer um dos modos 
gráficos de tela, precisará executar o comando CLS para notar o efeito. Ele apaga a tela e 
coloca nova cor de fundo. 

ü programa seguinte cxihe as combinações de cores das margens e de fundo 
disponíveis no MSX. Digite-o no modo de tela 1: 

10 R EM cores 

20 FOR MG=0 TO 15 

30 COLOR, ,MG 

40 FOR FU=0 TO 15 
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50 COLOR.FU 

60 FOR LÜOP=1 TC 200 :NEXT LOOP 

70 NEXT FU 

80 NEXT MG 

90 COLOR 15,4,7 

O loop na linha 60 dá a você tempo para ver as diferentes combinações de cores; 

sem essa linha, as cores iriam piscar muito rapidamente para serem vistas de forma 
apropriada. 

Observe que você pode usar variáveis numéricas e expressões numéricas no 
comando COLOR. Sc você usar um número real no comando COLOR, ele será truncado 
para o inteiro mais próximo. O número deve estar num limite entre 0 e 15. 

Tente executar esse programa nos outros modos de tela. Você precisará inserir 
um comando CLS para modos dc tela 2 c 3. 

Já pensou no que a cor 0 faz? 

Ela define a cor de fiindo, ou do texto, como sendo a mesma cor das margens. 
Sc usada para definir cor de margens, estas tomam-se pretas. 


EXERCÍCIO 


I. Defina uma das teclas dc função para dar uma combinação diferente de cores para o 
texto, fundo e margens». 



CAPÍTULO 23 

DESENHANDO PONTOS 

i. . v . .y, . v 



Os dois primeiros comandos tratados neste capítulo, PSET c PRESET, são 
minto similares. Por serem comandos gráficos, eles podem ser somente usados nos modos 
de tela 2 e 3. 

PRESE1’ pode ser usado para fixar um ponto na cor dc fundo. As coordenadas 
do ponto podem ser absolutas ou relativas. 

Apds usar PRESET, você descobrirá que a cor do texto é a mesma que a do 

Tu ndo. 

Tanto no modo de tela (SCREEN) 2 como no modo dc tela 3. a coordenada x 
deve estar no limite de 0 a 255, e a coordenada y entre 0 e 191. As coordenadas absolutas 
são lidas diretamente nos eixos X e Y: 


0 


EIXO X 


0 

F 

I 

X 

O 

Y 


191 


R 

(100.90) 


255 


P 

(230.162) 


/OI 
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O ponto R está na coordenada x = 100, e na coordenada y = 90. P está na 
coordenada absoluta (230,162). 

Uma coordenada relativa fomccc a posição de um ponto em relação a outro 
ponto de referência. Por exemplo, o ponto P esta na coordenada relativa (130,72) com 
relação a R. Isto significa que ele está 130 pontos mais h direita no eixo X do que R e 72 
pontos mais abaixo no eixo Y. 

F.m todos os comandos gráficos, o ponto de referência é sempre tomado em 
relação à última posição do cursor gráfico. 

A posição do cursor gráfico pode ser definida com PRESET: 

10 SCREEN2 

20 PRESET TOO, 100) 

30 GOTO 30 

Quando vocc executar o programa, pensará que nada ocorreu! Entretanto, agora 
o cursor gráfico está posicionado no pomo (100.100). Qualquer comando gráfico posterior 
que use coordenadas relativas, irá usar o ponto (100,100) como ponto de referência. 

Sc o comando gráfico seguinte desenhar uma linha, por exemplo, você deve 
especificar a cor da linha, ou redefinir o cor dos caracteres em primeiro lugar, usando o 
comando COLOR. De outra forma, a sua linha ficaria invisível! 

Se você especificar uma dada cor em um comando PRESET, um ponto dessa cor 
será desenhado e essa cor passará a ser a cor dos caracteres. Substitua a linha 20 
por: 


20. PRESET (100, 100),1 


O número que segue o comando PRESET deve scr um dos códigos de cor, 
conforme especificado no Capítulo 22. Se for usado um numero real, a parte decimal 
será ignorada. 


Se as suas coordenadas estiverem fora do modo de tela, obviamente você não 
verá nada! Se as coordenadas estiverem fora do limite de números inteiros de -32768 a 
32767, você obterá uma mensagem de eno. 


O comando PSET fixa um ponto na cor dos caracteres na coordenada 
específica. Essas coordenadas podem ser absolutas ou relativas. 
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Se uma cor for especificada no comando, então o ponto será desenhado nesta 
cor. Da mesma forma que com o PRESET, cstc comando também altera a cor de fundo 
para a cor especificada. 

O programa seguinte desenha blocos de cores aleatoriamente no modo de leia 3 
usando o comando PS ET. Esses blocos são, então, apagados ao desenhar os mesmos 
pontos aleatórios na cor de fundo usando o PRESET. 

10 Rfch pontos 
20 R -TIHE 
30 RDRET=RND(-R » 

40 SCREEN ? 

50 REM dttenha pontos coloridos 
60 FOR IX-i TO 300 
70 OOnnn 1000 
«0 PSEKXX.YX) .27. 

90 NEXT IX 

Í00 RE* coloca pontos na cor do fundo 
1Í0 RDRST=PNO<-R) 

120 FOR JX=Í TO 300 
130 GOSÜP 1000 
140 PRESET < XX. YTO 
150 NEXT SÁ 
160 ENO 

990 RE* sub-rot in* •'Anduwica 
1000 X5^RND<i>*256 
1010 YX=Pwr>< n*i?? 

1020 ZX-RNCK í)*16 
1030 RETURM 


Variáveis inteiras são usadas ao longo deste programa para aumentar a 
velocidade de execução (isto é, usamos X% em vez dc X). 

Cada vez que o programa for executado, os pontos serão desenhados em 
posiçóes aleatórias diferentes. Isto ocorre devido ao fato de que os pontos aleatórios são 
definidos pela variável TIME e essa variável assume um valor diferente cada vez que o 
programa é executado. Os mesmos poutos aleatórios são gerados na segunda metade do 
programa. Para gerar os mesmos números, usamos o mesmo argumento negativo da função 
RND na linha 110 e na linha 30. 

Finalmente . o comando PO INI retorna o código da cor de um ponto em 
qualquer um dos modos gráficos dc tela. O número retomado está, dessa forma, dentro do 
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limite de 0 a 15. Será retomado o valor -1 se as coordenadas do comando POINT esti- 
verem fora do modo de tela. Digite: 


10 COLOR , 2 
20 SCREEN 2 
30 P=POINT( 100, 100) 

Agora, de volta ao modo direto digite: 

PRINT p 

O número 2 será exibido, pois esse 6 o código de cor para o verde-médio, que é 
a cor de fundo atual. 


EXERCÍCIO 


1. Tente desenhar a curva da íúnçâo seno, usando: 

Y=A*SIN(X) f A 


Observe que A define a amplitude da curva. Varie X na faixa de 0 a 2*PI. 




CAPÍTULO 24 


BB 


DESENHANDO LINHAS E RETÂNGULOS 


Este capítulo trata do comando LINE, um outro comando gráfico que pode ser 
usado somente nos SCREENs 2 c 3. 


DESENHANDO LINHAS 


Para desenhar uma linha, você deve especificar a posição inicial c final; isso 6 
feito usando ou coordenadas absolutas ou relativas (ou mesmo uma mistura das duas). 
Digite este programa; 

10 SCREEN 2 

?0 LTNE(0„0)-(255,19i ) 

30 GOTO 30 

Este programa desenha uma linha diagonal ao longo do modo de tela. Observe o 
sinal entre os dois pares de coordenadas. 

Foram usadas coordenadas absolutas. O primeiro par de coordenadas, (0,0), 
fornece o ponto inicial da linha; (255,191) fornece a posição final da linha. 

Altere a linha 10 deste programa de modo que ele desenhe no modo de tela 3, 
para comparar a resolução dos dois modos gráficos de tela. 
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Se você tentar usar coordenadas x ou y maiores que 255 ou 191 
respectivamente, o computador desenhará até o canto do modo de tela, atribuindo a x o 
valor 255 e a y o valor 191. Entretanto, se as coordenadas estiverem fora do limite 
permitido, -32768 a 32767, você receberá uma mensagem de erro. 

Você não precisa especificar o ponto inicial da linha. Se este não for 
especificado, o computador começará a desenhar a partir da posição atual do cursor 
gráfico. 

Quando você acaba de desenhar uma linha, o cursor fica na posição final da 

mesma. 

Você pode usar coordenadas relativas para desenhar a mesma linha. Substitua a 
linha 20 do programa por: 

20 UNE (O.0J-STEP (255,191) 

O comando STEP diz ao computador que as coordenadas a seguir sãu relativas. 
Neste caso, a posição final de x será 255 pontos para a direita no eixo X a contar do 
ponto inicial, e a posição final y estará 191 pontos abaixo da posição inicial no eixo Y, 
colocando o ultimo ponto da linha na coordenada absoluta (255,191). 


LINHAS COLORIDAS 


Até o momento você desenhou somente linhas na cor atual do texto. Entretanto, 
6 possível especificar a cor da linha, seguindo o comando LINE com uma vírgula e então 
por um código de cor válido, isto é, um número entre 0 e 15. Vá ao Capítulo 22 para ver 
os códigos dc cores. Agora substitua a linha 20 do último programa por: 

20 LINE-(255,191),1D 

Agora o programa desenha uma linha diagonal amarela ao longo do modo de 

tela. 
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O próximo programa demonstra a resolução de cores no modo de tela 2; 

10 SCHEEN2 

20 FOR A=C TO 15 

30 UNE (0+A,0|-(200+A, 1 9 1 ),A 

40 NFXTA 

5C GOTO 50 

Você verá 16 linhas diagonais no modo de tela com as cores ■'borradas”. 

Substitua a linha 30 por: 

30 LINE(0,0-^A)-(255,0-»-A),A 

e conseguirá ver as cores sem borrões. 

Obtivemus esses efeitos devido ao modo como o modo gráfico dc tela é 
armazenado na memória do micro. 

Cada linha horizonjal é dividida cm grupos com 8 pontos de comprimento. Cada 
grupo pode conter apenas duas cures ao mesmo tempo; uma dc texto c outra de fundo. Ao 
sc desenhar a primeira linha na diagonal, a cor de texto é definida como 0 e a linha é 
desenhada nessa cor. A linha seguinte muda a cor de texto para I , mas isso altera a cor dc 
texto para todo o grupo de 8 pontos, de modo que o primeiro ponto da primeira linha muda 
de cor para preto. A oitava linha desenhada aitera a cor dc texto do primeiro grupo de 8 
pontos pela líltima vez; este grupo completo leni agora a cor azul-cian. 

A resolução vertical de cores é melhor que a resolução horizontal. A cor dc 
cada ponto vertical é independente da cor do ponto de cima ou de baixo e, por isso. as 16 
linhas horizontais não interferem umas com as cores das outras. 

Tente executar os dois programas no modo de tela 3. 

Nesse modo de tela, você verá as mesmas quatro linhas a cada vez, já que a 
resolução das cores é igual. Você pode ter uma cor para cada bloco dc 4 x 4 pontos. A 
resolução dc cor 6, dessa forma, a mesma que para a resolução gráfica. As primeiras 
quatro linhas são todas desenhadas umas sobre as outras, dc modo que você somente verá 
a última que é verde-claro. 
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DESENHANDO QUADRADOS 


R possível desenhar um quadrado usando quatro comandos L1NE um após o 
outro. Entretanto, existe uma maneira mais fácil de desenhar quadrados se você conhecer 
as coordenadas dos cantos superior esquerdo e inferior direito. Você continuará usando o 
comando LINE, mas agora o primeiro par de coordenadas fornece a localização do canto 
superior esquerdo, e o segundo, a localização do canto inferior direito. Para informar ao 
computador que você quer um quadrado e não uma linha, você deve escrever a letra “B" 
após u código da cor. Digite o seguinte programa: 

10 REM ca ixas 
20 SCREEN 2 

30 FOR A=0 TO 90 STEP 2 
4 0 LINE < 5 + A, 5+A )-< 255-A , 185-A) „ A/10, B 
50 NEXT A 
60 GOTO 60 


Este programa irá desenhar dez quadrados dc tamanhos e cores diferentes, 
incluindo a cor transparente. 

Observe que você pode usar uma expressão no lugar do código de cor, mas essa 
expressão deve scr um número entre 0 c 15. Sc cia for um número real, a parte decimal 
será anulada. 

Veja o efeito de executar este programa no modo de tela 3, alterando a linha 20 

para: 


20 SCREEN 3 

Se você conhecer os comprimentos dos lados dos quadrados, da mesma forma 
que sabe as coordenadas de seus cantos, é aconselhável o uso de coordenadas relativas 
para o segundo por de coordenadas, ou seja, para desenhar um retângulo dc 100 pontos de 
comprimento na direção X e 50 pontos de largura na direção Y, você pode usar: 

10 SCREEN 2 

20 LINE{10,10)-STEP(100,50),9,B 

30 GOTO 30 
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0 programa desenha um retângulo nas dimensões corretas. O canto superior esquerdo está 
situado na coordenada absoluta (10,10). 

O segundo par de coordenadas está agora especificando os tamanhos dos lados 
do retângulo que são paralelos aos eixos X e Y, respcctivamcnte. 

Este é o melhor método para desenhar quadrados. Por exemplo: 


10 REM quadrados 

20 SCREEN 2 

30 FOR A=i0 TO 90 

40 LINE <A, A>-STEP( A r A) , , G 

50 NEXT A 

60 GOTO 60 

O último programa desenha quadrados coloridos de tamanhos crescentes na 
diagonal do modo de tela. 


QUADRILÁTEROS COLORIDOS 


Para desenhar um quadrilátero e pintá-lo com urna cor específica, substitua o 
“B” por “BF”. A cor especificada no comando LINE será a usada para pintar o 
quadrilátero. 

10 REh CAIXA VERMELHA 
20 SCREEN 2 

30 LINE (20, 20) -STEP < 100, 100) , 9, BF 
40 GOTO 40 


EXERCÍCIO 


I. Escreva um programa que desenhe um quadrado dc um tamanho aleatório no modo dc 
tela. Pinte esse quadrado com a cor verde. 



CAPÍTULO 25 


DESENHANDO CÍRCULOS E ELIPSES 


i 



O comando CIRCLE permite a você desenhar círculos e elipses, tanto inteiros 
como parcialmentc. Vocc deve especificar a posição do centro do círculo, em coordenadas 
absolutas ou relativas, e o comprimento do raio. Como opção, você pode especificar a cor 
do círculo c a parte do círculo que deve ser desenhada. CIRCLF. é um comando gráfico e 
pode ser usado somente nos modos gráficos de tela. 


DESENHANDO CÍRCULOS 

Para desenhar um círculo, você deve especificar a coordenada central do círculo 
e o tamanho do seu raio. Por exemplo: 

10 REM desenhando círculos 
20 SCREEN 2 
H0 C I RCLE ( 1 20 r 100) ,90 
40 GOTO 40 

O programa acima desenha um círculo centrado na coordenada (128,100) com 
um raio de 90 pontos, na cor de texto atual. Obviamente, se você especificar um raio 
muito maior que o modo de tela, não poderá ver o seu círculo, ou verá somente a parte 
dele que couber no modo de tela. 
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Para especificar a cor do círculo, coloque uma vírgula após o raio seguida de um 
código de cor válido, ou seja, um número entre 0 e 15 (veja o Capítulo 22 para detalhes 
sobre códigos de cores). O programa a seguir desenha um círculo cm vermelho: 


10 BCREEIM 2 

20 CIRCLE <196, 199) ,90,? 
30 GOTG 30 


DESENHANDO ARCOS 

Para desenhar apenas parte de um círculo, ou um arco, você deve especificar o 
ângulo inicial e final, ü programa .seguinte desenha três quartos dc um círculo na cor 
preta: 


10 REM desenhando arcus 
20 SCREEN 2 
30 P I =4# ATN < 1 ) 

40 CIRCLE < í 28 r 100 ) ,90,9,0» 3*P 1/2 
50 GOTO 50 

Os dois últimos números que incluímos fomcccm os ângulos inicial e final do 
arco. Os ângulos devem ser especificados em radianos. (Se você não se lembrar de o que 
são radianos, veja o Capítulo 19.) A linha 30 serve apenas para calcular o valor de PI, de 
modo que o arco seja desenhado entre os ângulos 0 e 3/2*Pl radianos: 

PI/2 



3/2 PI 
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Todos os ângulos são medidos a partir do eixo X no sentido anti-horário. Como 
o círculo tem 2*1*1 radianos, os ângulos especificados podem ter qualquer valor entre 0 e 
2+PI. 


DESENHANDO PIZZAS 


Para fazer isso, coloque um sinal antes do ângulo inicial c final, isso 
resultará em linhas sendo desenhadas a partir do centro do círculo e terminando no arco. 
Execute o seguinte programa: 

10 REM DESENHANDO PIZZAS 

20 SCREEN 2 

30 PI = 4 * ATN<1) 

40 CIRCLE (128, 100), 90 f ,-PI/2,-PI 
50 BOTO 50 


Você deve ver o setor superior esquerdo do círculo desenhado na cor atual do 

texto. 


DESENHANDO ELIPSES 


Para desenhar uma elipse, vocé deve especificar a relação entre os raios. Isso é 
definido pon 


RELAÇÃO DE RAIOS = 


RAIO VERTICAL 
RAIO HORIZONTAL 


Se a relação entre os raios for maior que 1, então a elipse se alongará na 
vertical. O raio especificado será o raio vertical. 

Se a relação entre os raios for menor que I, então a elipse será alongada na 
horizontal e o raio especificado será o raio horizontal. 
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O programa a seguir desenha uma elipse completa, pois os ângulos inicial e final 
não foram especificados: 

10 REM desenhando el ipses 
20 SCREEN 2 

30 CIRCLE ( 128 * 100 > , 70 » » i*5 

40 GOTO 40 

Como a relação entre os raios é 1.5, a elipse será alongada no sentido vertical e o raio 
vertical será de 90 pontos. 

Agora substitua a linha 30 por: 

30 CIRCLE( 128, ICO) ,90,1, ,,0.5 

Você verá uma elipse alongada na horizontal, com raio horizontal de 90 pontos. 

Tente relações entre os raios 100 e 0.01. Com essas relações de raio, as elipses 
terão o aspecto de linhas verticais e de linhas horizontais, respectivamente, com raios 
iguais a 180 pontos. 

O programa seguinte desenha elipses coloridas, todas com relações de raio 
aleatórias, sempre posicionadas no centro do modo de tela: 


10 REh elipses diversas 

20 SCREEN 2 

30 FOR B=í TO 15 

40 A=RN0<-TIME)#2 

50 CIRCLE<i28,96> , 90 , B , , r A 

60 NEXT B 

70 GOTO 70 


Se você desejar, pode desenhar parte de unia elipse, especificando os ângulos 
inicial c final, da mesma forma como fez ao desenhar círculos. O sinal de prefixo, 
também deve ser usado: 


Í0 SCREEN 3 
20 PI=4*ATN< 1) 

30 FOR B=i TO 15 
40 A=B/10 
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50 SA=R ND ( — T I flE ) *2*P I 
60 EA=RND(-TIME)*2*PI 
70 CIRCLE<126,96) r 90,B,SA r EA,A 
80 NEXT B 
90 GOTO 90 

Este programa desenha figuras helicoidais centradas em (126,96). Os ângulos 
inicial c final são calculados usando a função RND. Observe que o ângulo final pode ser 
menor que o ângulo inicial. A relação de raio oscila na faixa dc 0. 1 a 1.5. Execute o 
programa no modo de tela 2 para comparar a resolução dos modos gráficos de tela (não 
se esqueça dc alterar a linha 10 para: 10 SCREEN 2). 


EXERCÍCIOS 


t. Escrèva um programa que desenhe 10 pequenos círculos em posições aleatórias do 
modo de tela. 

2. Altere o seu programa dc modo que os círculos tenham raios aleatórios. 

3. Desenhe um círculo composto dc quatro setores, cada qual sendo desenhado em uma 
cor diferente. 



CAPÍTULO 26 


iftS 


A MACROLINGUAGEM GRAFICA 


A macrolinguagem gráfica simula o movimento de uma caneta no papel e 
permite a vocc desenhar figuras complicadas com facilidade, usando o comando DRAW. 
Você poderá mover u cursor gráfico para qualquer ponto do modo de tela, com a “caneta” 
cm duas posições: “para cima” ou “para baixo' '. 

O comando DRAW deve ser seguido por uma string. Essa string contém 
macrocomandos gráficos que são representados por caracteres simples. 

Para desenhar uma linha em uma das quatro direções, isto é, para cima. para 
baixo, para a direita ou para a esquerda, devem ser usados os seguintes macrocomandos 
gráficos: 

U Desenha para cima. 

D Desenha para baixo. 

L Desenha para a esquerda. 

R Desenha para a direita. 

Você deve especificar o tamanho da linha logo após o comando. O comprimento 
é medido em pontos. 

O programa a seguir demonstra como usar a macrolinguagem: 

i0 REh QUADRADO 

20 SCREEN2 

30 P SET < í 23 ,91 ) 

40 DRAW"rl0di01 10UÍ0" 

50 GOTO 50 

77J 
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Ao ver a linha 40, o computador executa os macrocomandos sequencial mente ou 
seja, ele desenha uma linha para a direita com o comprimento de 10 pontos, então vai para 
baixo 10 pontos, para a esquerda mais 10 pontos c, finalmcntc, para cima por mais 
10 pontos. 

Podem ser traçadas linhas diagonais usando os quatro comandos seguintes: 

E Desenha diagonalmcntc para cima e para a direita ( /* ). 

F Desenha diagonalmente para baixo e nara a direita ( n. ). 

G Desenha diagonalmente para baixo e bara a esquerda ( ✓ ). 

H Desenha diagonalmente para cima e para a escuerda ( s ). 

Outra vez, cada um desses comandos deve ser seguido por um número. 
Entretanto, neste caso o número especifica o número de pontos movidos nas direções 
x e y. 

Por exemplo, a coordenada relativa do último ponto da linha desenhada por 
E10 poderia scr (10,10), tomando o primeiro ponto da linha somo referência. 

Este programa desenha um hexágono: 

10 REM HEXÁGONO 
20 SCREEN2 
30 PSET < 12B r 96 ) 

40 DRAW"e20P20d30g20h20ij30 
50 GOTO 50 

O comando M é usado para desenhar uma linha em uma posição de coordenada 
específica no modo de tela. Esse comando deve scr seguido pelos valores de x e y da 
posição da coordenada do último ponto da linha. Os valores x e y podem ser relativos 
ou absolutos. Por exemplo: 

M 40,50 

irá mover o cursor gráfico para a posição de coordenada absoluta (40,50). 

Para especificar coordenadas relativas, são usados os prefixos + ou - : 

M+*l0,+50 Desenha por uma posição afastada +40 pontos no eixo X e +50 
pontos rio eixo Y. 

Desenha por uma posição afastada +40 pontos no eixo X, e -50 pontos 
no eixo Y. 


M +40,-50 
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Observe que os comandos a seguir são equivalentes: 


M + 0,-10 = ULO 
M + 0, 10 = D10 
M + 10,0 = RIO 
M- 10,0 = L10 


M+ 10,-10- E10 
M + 10,10 = FIO 
M- 10,10 = G10 
M- 10,-10 = HIO 


No líltimo exemplo de programa, o comando PSET foi usado para posicionar o 
cursor gráfico antes de iniciar o desenho. De fato, lambem se pode fazer isso usando o 
prefixo B antes du comando M. B significa branco. Esse prefixo faz o cursor se mover 
sem desenhar: 


30 DRAWBM1 28,96" 

pode ser usado dentro de um programa para posicionar o cursor no centro do modo 
de tela. 

O prefixo B também pode ser usado com outros macrocomandos que você já 
viu, o que era esperado já que esses comandos sáo variações do comando M. 

Se você desejar mover o cursor de volta à posição inicial após desenhar uma 
linha, use o prefixo N. 

O programa seguinte desenha uma estrela no modo de tela: 


10 REM ESTRELA 
20 SCREEN2 
30 REM MOVE CURSOR 
40 DRAUl"Brti2Br96" 

50 REM DESENHA BRAÇOS 
60 DRAW~NU50ND50NR50NL50" 
70 DRAW"NE30NF30NG30NH30" 
B0 GOTO 80 


A cada vez que um braço da estrela for desenhado, o cursor se move de volta 
para o centro da estrela. 

Agora você é capaz de desenhar Figuras bastante complicadas. Uma vez definida 
a sua figura, é possível alterar a sua orientação no modo de tela usando o comando A 
(Ângulo). 
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/Ifi 


Esse comando roda os eixos do modo de tela, no sentido anti-horário, para 0, 
90, 180 ou 270 graus, a partir da orientação padrão. Por sua vez, isso afeta a orientação a 
direção dos comandos U, D, L, R, F, E, G e H. 

O comando A deve scr seguido por um niimcro inteiro entre ü e 3, onde: 

An Rotação. 

AO Reposiciona os eixos ua posição padrão. 

Al Executa a orientação padrão cos eixos no sentido anti-horário em 90 graus. 

A2 f xecuta a orientação padrão dos eixos no sentido anti-horário em 1 80 graus. 

A3 Executa a orientação padrão dos eixos no sentido anti-horário cm 2/0 graus. 

Uma vez executado o comando A, a orientaçflo de todos os comandos dc direção 
seguintes no programa será relacionada ao novo eixo. Para retornar ao valor padrão, você 
deve usar A0 com o comando DRAW. 

Execute o seguinte programa duas vezes: 

10 REM ANGULO 

20 SCREEN2 

30 ORAUTBM50, 100NR50ND50 

40 DRAW"A1BM150 7 100NR50ND50" 

50 GOTO 50 

Na primeira vez você verá: 


Na segunda vez: 
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Isso ocorre porque na primeira vez o comando A ainda está definido para AO na 
primeira execução. Na segunda execução A está definido como Al. 

Se você quiser repetir o primeiro resultado, redefina o ângulo de rotação para 
AO no início da slring da linha 30. 

Até o momento você somente desenhou na cor de texto. Para desenhar em uma 
cor diferente, ou seja, para alterar a cor de fundo, você deve usar o comando C. Ele deve 
ser seguido por um código de cor. Os códigos de cores são os mesmos que os usados 
com o comando COLOR, já visto no Capítulo 22. Desse modo: 


CO 

1 ransparente 

C8 

Vermelho-módio 

Cl 

PlütO 

C9 

Vermelho-claro 

C2 

Verde-médio 

CIO 

Amarelo-escuro 

C3 

Verde-claro 

C11 

Amarelo-claro 

C4 

Azul-escuro 

C12 

Verde-escuro 

C5 

Azul-médio 

C13 

Roxo 

Cb 

Vcrnclho oscuro 

C14 

Cinza 

C7 

Azul-claro 

Cl 5 

Branco 


Da mesma forma que com o comando A, uma vez definido oC,a cor atual de 
texto permanecerá até que seja redefinida ou por um novo comando C ou um COLOR. 

O comando S altera a escala, ou tamanho do seu desenho. O nilmero n, que 
segue a S, define o fator de escala. Esse número pode ser qualquer inteiro entre 0 e 255. 

O fator de escala (SF) é definido como: 


SF - n/4 


Dessa forma, SI resultará em um SF de 1/4. Todos os tamanhos especificados 
pelos comandos gráficos seguintes serão colocados na escala dc 1/4. Execute o programa 
seguinte: 


Í0 REM escala 
20 SCREEN2 
30 DRAld"bm50 r 50" 

40 DRAU"ri50di001i50uí00" 

50 DRAU"bm50„50" 

60 DRAW"slrl50dí001150ui00" 
70 GOTO 70 
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Você verá dois retângulos, um deles com 1/4 do tamanho do outro. Se você 
executar o programa outra vez, os retângulos serão desenhados uns sobre os outros, cm 
tamanhos reduzidos. 

Para redefinir SF para 1, você pode usar S4 ou SO. Insira um dos dois no início 
da stnng da linha 40 e cxccutc o programa outra vez. 

Se você desejar desenhar a mesma figura mais de uma vez em um programa, é 
aconselhável colocar a string que contenha os macrocomandos necessários em uma 
variável stnng. O programa a seguir desenha quatro “diamantes” no modo de tela: 


10 REM diamantes 

20 SCREEN2 

30 AS="f40g40h40e40" 
40 DRAU"bm50,0" 

50 DRAWAS 
60 DRAU"b«200 r 8" 

70 DRAUA* 

80 DRAW"bm50,i04" 

90 DRAWAS 

100 DRAU"bra200,104" 
110 DRAUA* 

120 GOTO 120 


O programa pode ser encurtado consideravelmente, colocando mais de um 
comando em cada comando DRAW. Para colocar uma string dentro de um DRAW, 
dcvc-sc usar o comando X. O programa abaixo desenha também quatro diamantes mas, 
desta vez, eles têm tamanhos diferentes. A string A$ t usada como substring: 


10 REh diamantes em escala 
20 SCREEN2 

30 AS="f40g40h40e40 / ' 

40 DRAW"s4bm50 r 8xa*;" 

50 DRAU"s3bm200,8xa%;" 

60 DRAU"s2bm50 9 104xa % ; " 

70 DRAW"bM200, 104xa1B s ” 

100 GOTO 100 


Observe que o nome da string é seguidu por um ponto e vírgula; ele não pode 
ser omitido. 
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Se vocc desejar usar uma variável numérica dentro de uma string DRAVV, talvez 
para definir o comprimento da linha, deve-se preceder o nome da variável pelo sinal 
Outra vez, o nome deve ser seguido por ponto e vírgula. O programa abaixo desenha 15 
quadrados e usa a variável i para definir a escala c a cor de cada quadrado. 

10 REM INCREMENTANDO QUADRADOS 
20 SCREEN 2 
30 DRAW " BM31 ,186" 

40 FOR X=1 TO 15 

50 DRAW " 5=X 5 C“X J U48R48D48L48" 

60 NEXT X 
70 GOTO 70 

Os cantos verticais esquerdos dos quadrados têm de ser posicionados cuidadosa- 
mente para permanecer na última posição do ponto de um grupo horizontal de 8 pontos. 
Isto é feito para evitar manchas entre a última linha branca vertical e as 14 linhas 
horizontais que definem a parte superior dos outros quadrados. O efeito de mancha irá 
aparecer se você tentar usar mais de duas cores cm um grupo horizontal de 8 pontos (veja 
o Capítulo 21 para mais detalhes). Tara ver o efeito dc mancha substitua a linha 30 por: 

30 DRAW"EM25,18G’' 


EXERCÍCIOS 


1. Use os comandos S e C para desenhar estrelas aleatoriamente no modo de tela. Cada 
cstTcln deve ter cor e tamanho diferentes. 


2. Desenhe uma casa. 



CAPÍTULO 27 

PINTANDO 



O comando PAINT pode ser usado para preencher uma área que esteja 
completamente delimitada por uma linha de uma cor específica. As coordenadas do 
comando PAINT devem ser as coordenadas dc um ponto dentro da região da figura a 
ser pintada, tilas podem ser relativas ou absolutas. 

As restrições quanto às cores permitidas sáo um pouco diferentes nos dois 
modos gráficos de tela. 


MODO DE TELA 2 


Antes de usar o PAINT, você deve desenhar o esboço de uma figura usando um 
dos comandos gráficos LINE, C[RCLE ou DRAW. Neste caso, a cor usada no PAINT 
deve scr a mesma que a especificada nos comandos gráficos. Por exemplo: 

Í0 REM paralelogramo pintado 

20 SCREEN2 

30 P RE SET < 100 y í 00 ) 

40 LINE— STEP < -50 F 50) ,6 
50 LINE-STEP <100,0) ,6 
£0 LINE— STEP < 50 r —50 ) r 6 
70 LINE— STEP <— i00 r 0) r £ 

80 PAINT (110*110) F £ 

90 GOTO 90 

722 




Pintando 


123 


As coordenadas (110,110) estão dentro do paralelogramo. O esboço de um 
paralelogramo vermelho será desenhado e, então, preenchido com tinta vermelha. Sc 
vocc tentar pintar o paralelogramo com qualquer outra cor. a pintura irá transbordar 
e preencher todo o modo de tela. 

Se o esboço tivesse sido desenhado na cor de texto atual, não seria necessário 
especificar a cor no comando PAINT, pois quando não for especificada a cor nesse 
comando, a cor atual dc texto será usada. Por exemplo: 

10 REM CIRCULO PINTADO 

20 SCREEN 2 

40 COLOR 10 

50 C3RCLE (100, 100) ,50 

60 PAINT STEP (0,0) 

70 GOTO 70 

A linha 40 define a cor de texto como amarelo. O esboço do círculo é, dessa 
forma, desenhado em amarelo c pintado nessa mesma cor. 

Observe que as coordenadas do comando PAINT são aquelas do centro do 

círculo. 

No modo dc tela 2, dcvc-sc tomar cuidado para evitar efeitos de manchas 
quando do uso do comando PAINT. O programa abaixo desenha dois triângulos, um dc 
costas para o outro. Um dos triângulos 6 então pintado de amarelo e o outro de vermelho: 


10 REh triângulos vi 
20 SCREEN2 
30 COLOR 10 
40 PSET < 48 , 50 ) 

50 DR AU"a0sid?6r ?6h ?/>" 
60 PAINT (60,70) 

70 COLOR? 

80 P SET (70, 60 ) 

90 DRAW"s3r96d9óh96" 
100 PAI NT < 120 , í 00 > 

110 GOTO 140 


Quando você executar este programa notará um efeito de zigue-zague. Isto 
ocorre porque no modo de tela 2 cada grupo horizontal dc 8 pontos não pode ter mais que 
duas cores. Não haverá problema ao se pintar o triângulo em amarelo, pois o texto é 
amarelo e o fundo 6 preto. Entretanto, quando o esboço do triângulo vermelho estiver 
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sendo desenhado, a cor do fundo ainda será o preto, e a nova cor de texto será o vermelho. 
A maioria dos triângulos amarelos não é afetada, mas onde um grupo de 8 pontos 
permanece em ambos os triângulos, a cor do grupo completo é alterada para vermelho. Isto 
resulta em pequenas seções do triângulo amarelo sendo perdidas para o triângulo preto, e 
daf o efeito de zigue-zague. 

Existe um remédio simples para este problema. Execute o seguinte 

programa: 


10 REM triângulos 
20 SCREEN 2 
30 COLOR 10 
40 PSET < 48 , 50 > 

50 DRAU"d?6r?6u?61?ó" 

60 PAINT ( 60 r 70 ) 

70 COLOR 9 
80 PSET <48,50) 

90 DRAW"r ?6d96h96" 

100 PATNT <70,60) 

110 GOTO 110 

Neste programa, um quadrado amarelo é desenhado e pintado. Um triângulo 
vermelho 6 então desenhado c pintado no topo dele. Como o quadrado contém apenas uma 
cor, não existem problemas quando se desenha o triângulo vermelho. 


MODO DE TELA 3 


Neste modo de tela, você pode pintar uma figura em qualquer cor, independente 
da cor usada na margem da figura. 


10 REM pintando com uma margem 
20 SCREEN3 

30 L I NE < 20 r 20 > — ( í 00 ,100) r 7,B 
40 PATNT ( 5 0 r 5 0 ) ,9,7 
50 GOTO 50 
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São dados dois números após o comando PAINT. O primeiro número fornece a 
cor do PAINT - que pode scr qualquer cor. O .segundo número fornece a cor da moldura. 
A cor da moldura é a cor da figura. No exemplo acima, o quadro foi originalmente 
desenhado em azul-cian, de modo que a cor da moldura também é azul-cian. Se você 
tentar usar qualquer outra cor para a margem, a pintura irá transbordar e preencher todo o 
modo de tela. 

Se o esboço da figura foi desenhado na cor de texto, então você deve definir a 
cor de pintura do PAINT igual a essa cor de texto; isto deve scr feito sempre que você 
especificar uma cor diferente da margem para pintar o restante da figura. Execute o 
programa a seguir: 

10 REM triângulo 
20 SCREEN3 
30 P0L0R15 

40 LINE(20,20>-5TEPC200,100> 

50 LINE-STEP < -200, 0 > 

60 L I NE- ( 20 , 20 ) 

70 PAINT < 50 , 80) , 10, 15 
R0 ROTO 00 

Você verá um triângulo desenhado em branco e então pintado dc amarelo com 
uma margem branca. Sc a margem pintada não tivesse sido definida para branca no 
programa acima, a pintura teria coberto totalmcntc o modo dc tela. 

Entretanto, se você quiser um triângulo complctamcntc branco, substitua a 
linha 70 por: 

70 PAINK5C.80) 

EXERCÍCIOS 

1. Escreva um programa que desenhe um quadro preto no modo de tela, usando a opção 
“BF" nos comandos LINE e PAINT. Execute esse programa tanto no modo dc tela 2 
como no 3. 

2. Escreva um programa que desenhe círculos concêntricos multicoloridos, cada qual 
sendo preenchido com uma cor diferente. Não se esqueça: para evitar os efeitos de 
mancha, inicie com maior círculo. 



CAPÍTULO 28 

A MACROLINGUAGEM MUSICAL 



Se você tiver familiaridade com a notação musical, o comando PLAY irá 
permitir escrever ou transcrever músicas de uma pauta muito facilmente. 

A macroliiiguagem musical é muito similar à macroiinguagem gráfica vista no 
Capítulo 26. 

O comando PLAY é seguido por uma string contendo os vários comandos 
permitidos na macroiinguagem musical. 

Os comandos A, B, C, D, E.FeG locam as notas musicais correspondentes. 
Qualquer um desses comandos pode ser seguido por um sinal **+•” ou para indicar se 
a nota correspondente é sustenido ou bemol. Lntretanto, a nota sustenido ou bemol 
resultante deve corresponder • à tecla preta do piano; B+, dessa forma seria inválido. 
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Agora vamos tocar as notas uma oitava acima. Para selecionar a oitava desejada, 
usamos o comando O. A primeira nota na oitava cCea última é B. O comando O(oitava) 
deve ser seguido por um número entre l e 8. A oitava padrão é 04, na qual a primeira 
nota, C, corresponde ao ‘‘C” (dó) do meio no piano. Usando 01 a 08 você tem acesso 
a qualquer nota do piano. 

O seguinte programa toca a escala do Ml maior, duas oitavas acima: 

10 REH hi Ma ior sNotacao A-G 

20 PLAY^ef+g+aboSc+d+ef+g+aboóc+d+e" 

Se você executar esse programa novamente, a escala irá iniciar na sexta oitava. 
Para evitar isso, inclua um comando 04 no início da string. Dessa torma a linha se 
toma: 


20 PLAY "04rr +G+AB05C+L) +EF +G+ABOÕC + D+E" 


Cada nota dentro das 8 oitavas disponíveis também pode ser executada 
usando-se o comando N. liste comando deve scr seguido por um número entre 0 e 96, 
inclusive. Como existem 96 notas ern 8 oitavas, a diferença entre N.S2 c N53, por 
exemplo, é de um semitom. 

De fato, as 8 oitavas disponíveis no comando N são elevadas de um semitom a 
partir dos disponíveis no comando 0. Isto ocorre pois NU, que corresponderia ao C em 
Ol, é silencioso, e pode scr usado da mesma forma que as pausas. A menor nota 
disponível, usando esta notação, corresponde a CA cm Ol. 


A maior nota no comando O é B em 08. Entretanto, N96 é um semitom maior c 


toca perto do C acima dessa. 

Observe que o “C médio” está em N36. 
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O programa seguinte toca a mesma escala em MI maior, mas desta vez usando 
o comando N: 

Í0 REM Mi haiorSNot-acao N 

20 PLAY"n40n42n44n4^n47n49n5i~ 

30 PLAY"n52n54n56n57n59nóln63nó4" 

Se você sabe ler música, achara a notação A-G mais fácil de usar. 

Até agora todas as notas foram executadas com a mesma duração. Para alterar a 
duração das notas seguintes, use o comando L. bsse comando deve ser seguido por um 
número que pode assumir qualquer valor entre I e 64. Os valores mais úteis são listados 
abaixo: 

Ln Duração da Nota 1 /n. 

LI Toca uma nota intoira ou somibreve. 

L? Toca meia nota ou mfnima. 

Li Toca uma nota com um intervalo de um quarto ou semínima. 

LG 1 or.a uma nota r.om um intervalo de um oitavo ou colcheia. 

L 16 Toca uma nota ccm um intervalo dc um dezesseis avos ou semicolcheia. 

L32 Toca uma nota ccm um intervalo de um trinta e dois avos ou lusa. 

Você também pode usar L3, L5 etc. L3 produziria uma nota com um terço do 
comprimento dc uma nota inteira. 

Se você não definir o comprimento das notas, ele será assumido automatica- 
mente como semínima, isto é, 14 é o valor padrão. 

Para alterar a escala de E maior, de modo que ela seja tocada em colcheias, você 
precisará inserir L8 no início de uma string PLAY. O comando L afeta todas as notas 
seguintes do programa. 

O programa seguinte toca MI maior em colcheias, usando a notação A-G. 
Observe que a duração da nota somente precisa ser definida uma vez no programa: 

Í0 REM Mi Maior sColcheia 

20 PLAY"18ef+q+abo5c+d+e" 

30 PLAY"n52n54n56n57n59nólnó3n6V y 
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Para determinar a duração de uma simples nota, você não deve usar a letra L, 
mas sim colocar o número, que especifica a duração da nota, após a nota ser tocada: 

A + 16 é o ecuivaierte a L16A + 

Observe que você não pode fazer isso na notação N. 

Para especificar uma pausa, usa-se o comando R. O valor padrão desse 
comando é R4, que é o equivalente a uma pausa de colcheia. Para alterar a duração da 
pausa, siga o comando R com um número entre 1 e 64. Rs se determina a duração da 
pausa. Desse modo: 

Rn Duração da pausa = 1/n. 

R 1 Pausa de uma nota inteira. 

R3 Pausa rie um terço de una nota. 

H2 Pausa de metace de uma nota. 

R4 Pausa rie um quarto dc uma neta. 

RQ Pausa ce jm oitavo de uma rota. 

R16 Pausa de um dezesseis avos dc uma nota. 

R32 Pausa de um trinta e dois avos ce uma nnta. 

R64 Pausa de um sessenta e quatre avos de uma nota. 

Sc você quiser tocar uma nota ou pausa “pontuada'’, siga o comando dessa nota 
com um ponto ou parada total. Cada ponto após a nota faz com que a duração dela 
aumente pela metade cm relação ao seu valui original. Por exemplo: 

10 REM notas pontilhadas 

20 PLAY"arA4 

O programa toca a nota como semínima, seguida por uma semínima pontuada e 
finalmente uma semínima pontuada duas vezes! 

A_s pausas são incluídas de modo que você possa ouvir as notas individualmente. 
Sem essas pausas você iria ouvir somente uma nota A tocada apenas uma vez. 

O tempo de uma peça musical pode ser determinado usando-se o comando I . O 
número que segue ao comando pode assumir qualquer valor inteiro entre 32 e 255, e 
determina o número dc semínimas tocadas por minuto. Dessa forma, você pode determinar 
o tempo de uma peça de música, desde as lentas com 32 semínimas por minuto ale as 
vigorosas com 255 semínimas por minuto. 
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O tempo padrão é TI 20. 

No último exemplo da escala do MI maior, alteramos todas as notas para 
colcheias, de modo que a escala foi tocada duas vezes mais rapidamente que no exemplo 
anterior. Um modo alternativo para aumentar a velocidade da execução seria alterar o 
tempo em T240. As notas ainda são tocadas como semínimas, mas cada semínima é tocada 
duas vezes mais rapidamente que antes: 

10 REh Mi Maior: Tempo F i .ío 

20 PLAY" 1 240ef +g + abo5c+d + e" 

O tempo deve ser determinado uma única vez no programa. 

O comando V determina o volume. O número que o segue deve estar entre 
0 e 15 inclusive. VO 6 muito baixo; VI5 6 muito alto. 

O valor padrão e V8. 

Da mesma forma que os comandos O, L c T; uma vez definido, esse comando 
irá permanecer com o valor definido até vocè redefini-lo ou até que o computador seja 
desligado. 


Se uma frase for repetida frequentemente em uma peça de música você pode 
criar uma string contendo a frase. Quando usar a string em um comando PLAY, vocè deve 
preceder o nome da string com um comando X c segui-la por ponto e vírgula. 

Duas variáveis string, AS c B$, são usadas no programa-cxemplo seguinte. O 
tempo é armazenado na variável numérica tempo de modo que você pode ouvir o efeito 
dessa alteração. Tente tempo dc 120 c 240: 

10 REM MELODIA 

20 I NPU7 "Temp ri" ; TEMPO 

30 A7>="vnar *4 ar 64ab-2r 64b-o5co4b-aga" 

40 Bfc-"b-o5c04fb-a2gf2.F2." 

50 GOSUBÍ000 
60 GOSUB1000 

70 PLAY"v9o5<_r 64ca4ao5cf 2cr64co4ao5cr 64c2" 

80 P L A Y"cd 2c r 64c o4b -ar 64a2 - g 2 . " 

90 GOSUB 1000 
Í00 END 

990 REM sub-rot ina 
1000 PLAY"t =t empo ? xaí ; " 

Í010 PLAY"xb%;" 

1020 RETIIRN 
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OBSERVAÇÕES 


Caso todas suas notas pareçam se encontrar ou não haja separação entre duas 
notas com o mesmo tom ( AA por exemplo), então diminua o número de modulação. 

Há apenas oito formas de onda disponíveis. Os números delas são 0, 4, 8, 10, 
11, 12, 13 e 14. Qualquer outro número repetirá a mesma forma. 

A oitava mais alta soará» mais como uma campainha ao passo que a mais baixa 
soará mais como um tambor. 


NOTAS DE ENCERRAMENTO 


Depois que você tiver dominado os fundamentos da programação BASIC, 
conforme mostrado neste livro, poderá voltar ao manual usuário do MSX e melhorar seu 
conhecimento. O seu manual deverá ser muito fácil de compreender com a introdução à 
programação BASIC que este livro lhe forneceu 

Não se preocupe se não conseguir aprender imediatamente todos os comandos 
disponíveis. Você pode escrever programas com apenas alguns dos comandos e melhorar a 
sua programação e conhecimento à medida que progredir. 

Para começar, cscrcva programas simples e não escreva demais inicialmcntc. 
Desmembre seus programas em partes, escreva e leste estas partes antes de seguir adiante. 
Utilize as declarações REM sempre que possível para comentar os programas que escreve. 

Um último conselho é de salvar seus programas periodicamente, mesmo que não 
estejam prontos. Muitos programadores já arrancaram os cabelos porque seu cão de 
estimação tropeçou no cabo de alimentação, ou porque um erro no programa perdeu um 
trabalho de três horas. 
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Você provavelmente já notou que no tinal de cada frase as vozes estão 
ligeiramente fora de sincronia. Isto é devido ao fato de que as strings de cada voz contêm 
numeros diferentes de comandos, algumas strings têm mais pausas e mudanças de oitavas 
que as outras. Cada comando toma um tempo muito pequeno. Você pode tentar sincronizar 
as stnngs inserindo umas poucas *‘R64” e mudanças de oitavas em locais apropriados. 
(Nota: Um comando 04 não fará nada se a string já estiver nessa oitava, mas ela irá 
incrementar o tempo dc execução global da string.) 

Até aqui todas as notas que você tocou soaram num tom muito sincronizado. É 
possível alterar isso colocando uma envoltória no volume das notas; essa envoltória irá 
controlar a qualidade do som da nota. Existem diversas cnvolfónas de volumes predetinidas 
que você pode escolher; veja a Parte 3; Som. 

Pam selecionar uma envoltória, use o comando S seguido por um número entre ü 
e 15. 0 período de uma envoltória, ou modulação, é determinado pelo comando M. Isto é 
determinado por qualquer valor entre 1 c 65535; o valor padrão 6 255. Digite o seguinte: 

10 FLAVSIOLICDE” 

Você irá ouvir uma envoltória de período de um décimo colocada sobre as notas 
C, D c E. 

Tente alterar o mímero da envoltória. Digite e execute: 

10 PLAY“M100CS10L1CDE W 

Agora, com a mesma envoltória, tente outros valores de M. 

Faça experiências com outros valores de MeS. A ordem dos comandos SeM 
não é importante, mas ambos têm de vir antes das notas a serem executadas. 

Finalmente vamos ver o comando BEEP. Este é o comando mais simples de ser 
asado, e diz ao computador que faça somente um ruído. Digite: 

3EEP <RETURN> 

Ao executar um BEEP, o computador redefine todas as variáveis dos sons. 
Desse modo, após um BEEP, todos os macrocomandos musicais são redefinidos para os 
seus valores padrões. 
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EDIÇÃO AVANÇADA DE PROGRAMAS 


O MSX-BASIC tem um editor que permite editar um programa em qualquer 
parte do modo de tela. 

Esta seção entra em detalhes técnicos sobre a edição, bem como a edição 
avançada do MSX usando a tecla de controle <CTKL>. 


COMO EDITAR 

Quando se edita, você frequentemente precisa escrever uma série de linhas, ou 
cancelar seções inteiras do seu programa. O MSX-BASIC tem quatro comandos muito 
úteis que podem tomar menor o tédio da edição; LIST, AUTO, RENUM e DELLTE. 

Uma vez que tenha digitado o seu programa na memória do computador, você 
irá querer rcvc-lo antes dc cxccutá-Io. Para examinar o programa inteiro use o comando 
LIST. Ele irá exibir o programa na ordem clara e lógica; o programa pode ser então 
editado utiizando-.se os vários dispositivos de edição do MSX. 

O comando LIST tem as seguintes variações que podem ser usadas de acordo 
com as suas necessidades: 
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LIST 

LIST <linha> 


Lsta o programa inleiro. 
Lista a linha especiticada. 
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LIST <linha1 > - <linha2> Lisla o programa entre a linhal e a Iinha2 inclusive. 

I IST <linha>- Lista o prngrama a partir da <linha> esoecilcada até o 

fim. 

LIST-<linha> Lista o programa a parti do início até a <linha> 

especificada. 

Você observará que, se o programa que você estiver listando for muito longo, o 
LIST executará o programa no modo de tela até a última linha deste, ou seja, até a última 
linha especificada no comando LIST. 

Rxistcm dois métodos para sc exibir uma parte do programa que nos interessa 
no modo de tela; 

a) Use LIST < linha 1 linha2> de modo que você só obtenha a seção 

desejada. 

h) Use LIST c, quando você vir a pane do programa que lhe interessar, 
pressione < CTRL ><STOP>e interrompa a listagem. 

Observe que a tecla <ST01*> irá parar apenas temporariamente a listagem. Sc 
você pressionar a tecla <STOP> outra vez, a listagem continuará a partir do ponto onde 
havia parado. 


AUTO 


O comando AUTO coloca o MSX no modo de numeração automática de linha, 
que oferece um número dc linha a cada vez que você pressiona a tecla <RETIJRN>. Ele 
economiza o aborrecimento de se digitar o número de linha a cada nova linha, e torna a 
vida um pouco mais fácil para o programador. Os números dc linha terão um incremento 
constante. 

O comando AUTO tem as seguintes variações, que podem ser usadas de acordo 
com as suas necessidades: 

AUTO Fornecerá números de linha a partir do número 10 com 

incrementos de 10 a cada <RETURN:>. 

AUTO <lmha> Fornecerá números de linha a partr do número 

de <linha> especificado com incrementos de 10 a 
cada <RETURN> . 
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AU I O < linha > , 
<incremenlo> 
AUTO, <incremento> 

AUTO < linha >, 


Fornecerá números dc linha a partir dc número de 
< linha > especricadc com incrementos de < incremento >. 
Irá continuar a partir da linha cm que vocô parou, com 
o < incremento > especificado. 

Fornecerá números de linha a partir do número de linha 
especificado com o ircremento já especificado para as 
linhas anteriores. 


As duas maneiras mais comuns de se usai o, comando AUTO, quando se escreve 
ou edita um programa, são: 

1. Quando se inicia um novo programa que já tenha sido planejado de alguma 
forma no papel, o AUTO é usado para se ter números dc linha a partir de 10, 
com incrementos dc 10. Isso dá ao programa uma aparência ordenada. 

2. Vamos dizer que você tenha as linhas 100, 110, 120, 130, 140, 150, 160 
e queira inserir uma sub-rotina entre as linhas 150 e 160. Antes de mais 
nada use RENI JM para criar mais espaço entre as linhas 150 e 160. Isto pode 
ser feito com RENUM 1000, 150, 100. Como resultado você terá as linhas 
100, 1 10, 120, 130, 140, 1000, 1 100. Use agora ALTO 1010, 5 que lhe dará 
uma série de números de linha iniciando em 1010, com incremento dc 5. O 
resultado final se parecerá com este: 

100,110,120,130, M0, 150, 1000, <1010, 1015, 1020, 1 025, ... > , 1 100 

Existem alguns pontos a serem lembrados sobre o comando AUTO: 

1. Existem duas maneiras dc sair do modo AUTO: 

a) Pressione <CTRL> <STOP> ao mesmo tempo. 

b) Pressione <CTRL> <C> ao mesmo tempo. 

A linha da qual você saiu não será armazenada. 

2. Se existir um número de linha dentro do programa que você está editando, o 
computador dará a você um sinal de atenção na forma de asterisco “ * ” após 
o número da linha. Se você não quiser apagar a linha, pressione a tecla 
<RETURN>, mas se estiver substituindo a linha, ignore o aviso e 
digite o que você quiser. 
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RENUM 

Tendo digitado o seu programa, invariavelmente você descobrirá que os 
números de linha não estão a incrementos fixos. Ele parece confuso e, se o programa tiver 
de ser apresentado a uma outra pessoa, certamente dará uma péssima impressão. A cura é 
simples: renumere o programa inteiro, usando o comando RENUM. 

RENUM, por si só, irá renumcrar a começar do 10, cm incrementos de 10. Essa 
é a forma mais usada, mas você pode renumerar a partir de qualquer número de linha e 
com vários incrementos. RENUM irá alterar automaticamente os números de linha 
associados a GOTO, GOSUB, RESTORE, THEN, ELSE, ON GOTO, ON GOSUB. 

O comando RENUM tem as seguintes variações que podem ser usadas de acordo 
com as suas necessidades: 

RENUM Renumera a partir tia linha 10, fim incrfimfintos de 10. 

RENUM < linhal > Renumera a padir da < linhal >, em incrementos de 10. 

RENUM < linhal >, Renumera a partir da antiqa <Hnha2>, inicando com a 

<linha?> nova <lmha1 > em incrementos de 10. 

RENUM <hnha1>, Renumera a partir da antiqa <linha2> iniciando com 

< linhal > , a nova < linhal > com c < incremento> informado. 

< incremento > 

RENUM ,<Hnha2>, Renumera a partir da antiga <linha2> iniciando na 

< incremento > linha 10 cor- o < incremento > informado. 

RENUM ,<lmha2> Renumera a partir da antiga <Hnha2> iniciando na 

linha 10 com o incremento de 10. 

RENUM „ <incremento> Renumera a partir da linha 10 com o <:incremento> 

inlormado. 

RENUM <linha1*>„ Renumera iniciando com a nova linha <número1> a 

<incremento> partir da antiga linha 10 como <innrenento> informada 


RENUM é também usado para criar espaços de números de linha suficientes 
para você inserir uma parte em um programa (como quando foi usado com AUTO, como 
mostrado anteriormente). 
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DELETE 


Algumas vezes você vai achar que cena parle de um programa é um lixo lotai. 
Se a parte que você quiser apagar for uma única linha, então vo cc só precisa digitar o 
número de linha e pressionar <RETURN>. Erilretanlo, se você quiser apagar uma série 
inteira de linhas, use o comando DELETE. E simples e efetivo. E também permanente, de 
modo que, uma vez apagadas, não há meio de recuperar essas linhas, exceto digitando-as 
de novo! 

O comando DELETE tem as seguintes variações que podem ser usadas de 
acordo com as suas necessidades: 

DELETE <lnha> Apago a <lmha> especií ceda. 

DELETE <r|inha1 > - <linha2> Apaga entre a <r linhal > e <linha2>. 

DELETE <lmha2> Apaga a:ó a <linha2> inclusive. 


TECLAS DE CONTROLE E DE FUNÇÕES ESPECIAIS 


O MSX tem um certo número de teclas de funções especiais c de controle usadas 
principalmente na edição de programas. Eis unia tabela para mostrar o que você pode fazer 
com elas e como accssá-las. Todas as teclas dc controle são acessadas prcssionando-sc 
< CTRL:> e a tecla em questão, simultaneamente. 


Código 

Hexadecimal 

Tecla de 
Controle 

Tecla 

Especial 

Função 

02* 

<CTRLXB> 


Move o cursor uma palavra 
para a esquerda. 

03* 

<CTRLxC> 


Pára a execução quando o 
BASIC estiver esperando 
por 1NPIT. Retorna para o 
modo direto. 

05* 

<CTRLxE> 


Apaga todo o texto à direita 
do cursor, incluindo o 
caractere na posição do 
cursor. 

06 * 

<CTRLxF> 


Move o cursor uma palavra 

para a direita. 


* Indica que desativai í o modo de INSHRT <*c estiver ativo. 








Código 

Hexadecimal 

Tecla de 
Controle 

Tecla 

Especial 

Função 

07 * 

<CTRL><G> 


Toca u bip. 

08 * 

<CTRLxH> 

BS 

Retorna um espaço e apaga 
o caractere à esquerda do 
cursor. 

09 

<CTRL><I> 

TAB 

Move o cursor para a posi- 
ção de tabulação seguinte. 
TAR é definido para inter- 
valos de H caracteres. Ele 
irá colocar brancos por 
onde se mover. 

0A* 

<CTRL><J> 


Alimentação de linha. Move 
o cursor para o início da 
linha seguinte. 

0B * 

<CTRLxK> 

HOME 

Move o cursor para n canto 
superior esquerdo da tela. 

oc* 

<CTRL><L> 

CLS 

Limpa a tela e move o 
cursor para a posição 
HOME. 

OD * 

<CTRL><M> 

RETURN 

Retorno de carro. Executa 
a linha atual. 

OE* 

<CTRL><N> 


Move o cursor para o final 
da linha atual. 

12* 

<CTRLxR> 

INS 

Entra no modo INSERT. O 
cursor fica com a metade 
do tamanho c permite 
inserir caracteres na 

posição do cursor sem 
apagar nada. 

Apaga a linha atual. 

15 * 

<CTRLXU> 


Ignorada nesta versão dc 

1B ♦ 

<CTRL:>« > 

ESC 

MSX. 

1C * 

<CTRLxY> 

-» 

Move o cursor para a 
direita uma posição por vez. 

1D* 

<CTRL>< >> 

*— 

Move o cursor para a es- 
querda uma posição pur vez. 

1E * 

<CTRL>< A > 

1 

Move o cursor para cima 
uma linha por vez. 

IF * 

<CTRL><— > 

i 

Move o cursor para baixo 
uma linha por vez. 

7F 

<CTRLxDEL> 

DEL 

Apaga o caractere na 
posição do cursor. 


indica que desativará o modo INSERT se C3tiver ativo 
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CONSTANTES 
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CONSTANTES 

Constantes são números ou strings que nãn variam. Por exemplo: 100 e 
“VELOCIDADE” são constantes. 

Existem dois tipos de constantes - slrings e numéricas. 

Conãtantes strings 

Uma constante string é uma sequência de até 255 caracteres de comprimento. 
Elas podem conter quaisquer caracteres, gráficos ou códigos dc controle, que süo usados 
no MSX-BASIC. Elas devem vir entre aspas: 

“LUKE SKYWALKER” 

“O QUE É ISSO 7’ 

“ANTONIO, RICARDO E HENRIQUE" 

H C?S1 00.000.000,00" 


Constantes numéricas 

Elas podem ser números positivos ou negativos c são dc seis tipos: 

1. Constantes inteiras Números inteiros entre -32768 e 32767 ou de 

Wi 
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11 111111 111111 111 a 0000000000000000 em 16 
bits. Elas não podem conter pontos decimais. 

2. Constantes de ponto Números reais positivos ou negativos que algumas 
fixo vezes contêm ponto decimal, isto é: 657.188. 


3. Constantes de ponto Números reais negativos ou positivos na forma 
flutuante exponencial. 

Formatos: 

Precisão simples 
<intcim> F< inteiro > -56F10 

< ponto fixo> E< inteiro > 7.865E5 
Precisão dupla 

< inteiro :> Dcinteiix» -1 896243232662D50 

< ponto fixo> D < inteiro > 7.8827727277275D-5 


4. Constantes 
hexadecimais 

5. Constantes cm octal 


6. Constantes binárias 


O limite de precisão está entre 1E-64 e 1E64 
(1 x 10 64 a 10*4). 

Números hexadecimais denotados pelo prefixo 
&H dc precisão simples ou dupla. 

São representados pelo prefixo AO, e trabalha 
com dígitos de 0 a 7. Exemplo: &06543. 

Números binários denotados pelo prefixo &B. 
Binário é um sistema numérico de base 2, isto é, 
usa 0 c 1 somente. Exemplo: &B0 1010101. 


Precisão simples e precisão dupla 

Uma das características principais do MSX-BASIC é que ele tem funções 
aritméticas BDC com 14 dígitos de precisão dupla, o que a maioria dos computadores de 
8 bits não possui. 

A precisão dupla é normalmente oferecida em sistemas de 16 e 32 bits mas a 
Microsoft reescreveu o seu BASIC para fornecer cálculos dessa precisão. 
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Você pode ter constantes numéricas de precisão simples ou dupla mas, se não 
especificar qual, o computador assumirá precisão dupla. 

Piecisão: Precisão simples: 6 dígitos. 

Precisão dupla: 14 dígitos. 

As constantes de precisão simples tem as seguintes características: 

1. Forma exponencial (E) 1.65E-2 

2. Ponto de exclamação no f nal P35.77! 

As constantes dc precisão dupla têm as seguintes características: 

1 . Qualquer dígito ou número sem um 

ponto de exclamação ou exponencial 1 878932.2 1 56 

2. Exponencial usando D 562./65333D-06 

3. Sinal # noíinal 387.0001 4 


VARIÁVEIS 


Variáveis são nomes aos quais você atribui valores. Os valores dc uma variável 
podem ser alterados. Eles podem ser atribuídos especificamenle por um programador (isto 
é, Pl-3.14) ou calculadas pelo computador (isto 6, PI=4+ATN(1)). 


Nomes de variáveis 

Os nomes dc variáveis podem ter qualquer tamanho. Entretanto, o computador 
somente reconhece os primeiros dois caracteres de qualquer nome dc variável. Sc duas 
variáveis tiverem as mesmas duas primeiras letras, elas são assumidas como sendo a 
mesma (VAR1 e VAR2 são a mesma variável). Se você quiser fazê-las diferentes, use 
VI e V2. 

Os nomes de variáveis não podem conter palavras reservadas, ou seja, comandos 
e funções do BASIC em qualquer parte do nome. Por exemplo, LENTE% está errado pois 
contém o comando LEN. 
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Declaração de tipos 

Se uma variável não contiver qualquer tipo de caractere de declaração seguindo 
o seu nome, então ela é assumida pelo computador como sendo uma variável numérica 
de precisão dupla. 

A 1 = < número de precisão dupla> 

Sufixos de declaração de tipos: 

S Um sinal de cifrão indica que a variável é string: 

Z$="stnng de caracteres". 

ENDER$=“Rua du Padeiro, 21 B". 

% Um sinal de percentagem indica uma variável inteira: 

X%=25 

XY%=32768 

' Um ponto de exclamação indica una variável numérica de precisão simples: 

F! =5679.7! 

PRESII=4,2888E-02 

á* O sinal # indica uma variável numérica de precisão dupla: 

H# =3.14161718293 
MXM ft =52/7.7655D25 


UKF tipo de variável > 

F possível definir um tipo dc variável usando vários cormndos DEF. Quando 
o tipo da variável é declarado usando um desses comandos, qualquer variável iniciando 
com o < caractere > declarado se tomará um tipo de variável que não necessita usar 
sufixos em seu nome. Isto significa que se você define DEFSTR A, então qualquer 
variável que se inicie com a letra A se tomará uma variável string mesmo sem ter o sinal 
de cifrão usual. Entretanto, isso não significa que AB% será uma variável string, já que o 
caractere de declaração de inteiro (%) tem priuridade sobre DFSTR. 


Existem quatro comandos DEF ctipo de variável >. São os seguintes: 
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• DEFSTR declara que qualquer nome de variável que se inicie com a faixa de 
caracteres especificada será tratada como uma variável string: 

DEFSTR A 
AST=“PLANETA" 

• DEFINT declara que qualquer nome de variável que se inicie com um 
caractere na faixa dc caracteres especificada será tratada como uma variável 
inteira. 

• DEFSNG declara que qualquer nome de variável que se inicie na faixa 
especificada de caracteres será tratada como um número dc precisão 
simples. 

• DEFDBL declara que qualquer nome de variável que se inicie na faixa 
dc caracteres especificada será tratado como um número de precisão dupla. 

Observe que os caracteres #, $. % c ! tem prioridade sobre esses 
comandos. 


MATRIZES 

Uma matriz é um grupo dc variáveis que possui um nome comum. Ela é definida 
usando-se o comando DIM. Comandos DIM definem uma seção de memória à parte para o 
uso da matriz. Cada elemento da matriz tem um número. Por exemplo, digamos que você 
definiu DIM C(3). Você tem, então, quatro variáveis com o nome C( ): C(0), C(l), C(2) e 
C(3). Todas as variáveis de matriz iniciam no elemento zero. Esta é uma matriz 
unidimensional, mas não há razões para você não ter matrizes multidimcnsionais como 
DIM A(2,2), que fornece uma tabela de variáveis de dimensão 3x3 como se mustra 
abaixo: 


A(0,0)A(1 ,0)A(?,0) 

A(0,1)A(1,1)A(2,1) 

A(0.2)A<1,2)A(2,2) 

Esta é uma matriz de duas dimensões, mas você pode ter matrizes de três 
dimensões ou mais. A dimensão máxima para uma matriz é 255, porém é provável que não 
exista memória suficiente para criar tal tipo de matriz. 
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Se uma matriz tiver menos que 1 2 elementos, não há necessidade de se executar 
um comando DIM, pois o computador define automaticamente espaços de memória de 11 
elementos. Programas como os mostrados a seguir são perfeitamente válidos: 

10 FOR 1=0 TO 10 

20 S(l)=1 

30 NEXT I 

É possível ter matrizes de qualquer tipo assim que o tipo for declarado. Por 
exemplo, DIM S%(100) fornece a você uma matriz string de cento e um elementos. 

Quando uma matriz é inicializada, todos os valores são assumidos como sendo 
zero para matrizes numéricas e strings nulas para matrizes strings. 


Requisitos de memória 

As variáveis são armazenadas na ÁREA DE MATRIZES, na ÁREA Dfc 
VARIÁVEIS ou na ÁREA DE STRINGS, dependendo do seu tipo (veja o mapa de 
memória). 

Eis uma lista do número de bytes usados por essas variáveis: 


Variáveis Inteira 

Precisão simples 
Precisão dupla 
String 


2 bytes 
4 bytes 
8 bytes 

3 mais o tamanho do conleúdo 


Matrizes 


Inteira 

Precisão simples 
Precisão dupla 
String 


2 bytes por elemento 
4 bytes por elemento 
8 bytes por elemento 

3 rriais o tamanho do conteúdo por elemento 


VÁRPTR 


Para descobrir onde exatamente os dados de uma variável serão armazenados na 
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memória, você deve usar a função especial VARPTR que fornece o endereço de uma 
variável em particular: 

in a%=ioo 
20 PRINT VARPTR (A%) 

Você pode descobrir a localização dc memória de qualquer tipo de variável 
desde que ela exista. Ela pode ser uma string ou mesmo uma matriz. 


Área de variável string 

O conteddo das variáveis string é armazenados na AREA DE STRINGS 
da memória do MSX (veja o mapa de memória). O tamanho dessa área está restrito ao 
padrão inicial dc 200 hytes; desse modo, o tamanho máximo de uma string está limitado a 
200 caracteres a qualquer tempo. Entretanto, você pode aumentar o tamanho da ÁREA DE 
STRINGS usando o comando CLEAR. Por exemplo, para aumentar o tamanho da ÁREA 
DE STRINGS para 255 bytes, execute: 


CI FAR 255 
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O MSX-BASIC pode converter um tipo de constante numérica em outro. Existe 
uma regra definida para se fazer isso: 

I. Se uma constante numérica de um tipo é definida igual a outra de outro tipo, 
o número armazenado irá depender inteiramente do ripo da variável. 

Exemplo 1 


IO Cí«1.2345678‘?01 

20 PR INI C! 

run 

1.23457 


O número de precisão dupla 1.234567890 é 
convertido para uma variável de precisão simples 
quando atribuído a C!. 


Exemplo 2 


IO 1 V.= l - 23E-03 
20 PR INT 17. 
run 
O 


O número de precisão simples 1.23E-03 6 
arredondado para o inteiro mais próximo, que é 0, 
quando atrihuído a uma variável inteira. 


2. Durante a execução da expressão, todas as variáveis e constantes são 
convertidas para a maior precisão das variáveis usadas. Quando a expressão 
é definida para ser igual a uma variável, o resultado da expressão é 
convertido para o tipo de precisão especificado pela variável. Se o tipo de 
variável resultante não for especificado, o resultado permanece com o mesmo 
nível de precisão que tinha durante a execução. 
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Exemplo 1 
Exemplo 2 

Exemplo 3 

3. 

Exemplo 

4. 

Exemplo 1 


149 


10 D=l!/3# 

20 PRINT D 
run 

.33333333333333 


1! tem precisão simples enquanto 3# tem pecisão 
dupla. A operação aititmética foi executada com 
precisão dupla c armazenada na variável D dc 
precisão dupla. 


10 D=l!/3! 
20 PRINT D 
run 

- 333333 


Ambas as constantes são de precisão simples, de 
modo que as operações aritméticas são executadas 
com precisão simples, mas D é uma variável de 
precisão dupla, dc modo que o resultado é 
convertido para precisão dupla. 


IO D!-l/3 
20 PRINT D' 
run 

.333333 


As operações aritméticas são executadas com 
precisão dupla, mas o resultado é convertido para 
precisão simples quando armazenado em D!. 


Operadores lógicos convertem as constantes e variáveis em números inteiros 
de 16 bits antes da operação ser executada. O resultado é um inteiro e os 
números envolvidos devem estar dentro da faixa de inteiros ou irá ocorrer 
um erro. 


10 d» 136. 63 and 654 Os números são alterados para 156 e 654. O 
run PRINT DX resultado 140 é armazenado em D% que é uma 

14© variável inteira. 


Quando um valor de ponto tlutuante ou de ponto fixo é convertido para 
inteiro, a parte fracionária é truncada. 


10 AX- 123. 456 
20 PRINT AZ 
run 
123 


ü valor de ponto fixo 123.456 é truncado para 123 
quando atribuído à variável inteira A%. 
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Exemplo 2 


IO A7.= l . 0Í»97554 D02 
20 PRINT AX 
run 
100 


O número de ponto flutuante 1.00097554D02 6 
arredondado para 100 quando convertido para A%, 
uma variável inteira. 


5. Quando um número de precisão simples 6 convertido para um número dc 
precisão dupla, somente 6 dígitos podem ser fornecidos para o resullado 
de precisão dupla. 

Exemplo 


10 A#- 1.33333 
20 PRINT Al» 
run 

1.33333 


A# é uma variável de precisão dupla mas o 
resultado é 1.33333. 


CONVERSÃO DE TIPOS USANDO AS FUNÇÕES 
DO MSX-BAS1C 


CDBL, CINT, CSNG, VAL, STR$ 

Apesar do MSX fazer a conversão de tipos automaticamente quando está 
calculando uma expressão, você pode programá-lo para fazer conversão de tipos usando 
uma das funções de conversão de tipo. 

CDBL, CINT e CSNG seguem as mesmas regras acima, mas as funções VALc 
STRS são usadas para converter de string para numéricas e vice-versa, sendo que elas 
seguem regras ligcimmcntc diferentes. 


CINT 


A função CINT converte números de precisão simples, precisão dupla, variáveis 
e expressões em números inteiros. O argumento deve estar estritamente dentro da faixa de 
inteiros (de -32768 a 32767). Caso contrário ocorrerá um erro. 

CINT( < constante numérica > ) 

CINT ( < variável numérica > ) 

CINT ( < expressão numérir:a> ) 
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Exemplo: 

PRINT CINT( 1234.56789) 
1234 


CSNG 


A função CSNG converte u argumento em um número de precisão simples. 
CSNG arredonda o argumento para a sexta casa decimal mais próxima. Se um inteiro for 
convertido, a precisão não será alterada. 

CNSG(< constante rtimérca> ) 

CNGS ( < variável numérica> ) 

CNGS ( <expressão numérica > ) 


Exemplo: 

PRINT COS(0.7656) 
.72096670541357 
PRINT CSNC(COS(ü. 7656)) 
.720967 


CDBL 


A função CDBL converte números inteiros, números de precisão simples, 
variáveis c expressões cm numeros de precisão dupla. Quando um número dc precisão 
dupla é convertido, somente 6 dígitos serão fornecidos nu resultado de precisão dupla, 
dupla. 


CDBL { < constante numérica > ) 
CDPI ( < variável nurnériea> ) 
CDEL (<cxprcssao numérica > l 


Exemplo: 


PRINT CDBL (5.666!) 
5.666 
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VAL e STR$ 

Essas funções são usadas para converter strings em números e vice-verea. 
STR$ (< numéria») 

STR$ converte o argumento numérico em uma string. 


VAL (< string >) 

VAL retoma o valor de uma string que contém um número. Se uma string for 
uma representação da string de um número, então pode ser usada VAL. Entretanto, 
VAL não pode executar uma expressão contida numa string. 

VAL elimina espaços, tabulações e alimentação de linhas da frente dc um 
número em uma string, mas não pode trabalhar com outros caracteres. VAL reconhece 
sinais de mais e de menos. 

Veja o Capítulo 15 para exemplos. 



CAPÍTULO 32 


EXPRESSÕES E OPERADORES 





Uma expressão pode ser uma string, uma constante numérica ou uma variável, 
ou qualquer tipo de combinação que retome um valor simples, desde que válido. Existem 
quatro tipos dc operadores matemáticos ou lógicos: 

1. Aritmético 

2. Relacional 

3. Boolcano (lógico) 

*1. Funcional 

Os tópicos 1 e 2 são ccbertos nesta parte do livro (veja as seções relevantes que 
são relacionadas com os outros operadores). 


OPERADORES ARITMÉTICOS 


Os operadores aritméticos, em ordem de precedência, são: 
1. A exponencial A A B 


2 . - 


negaçao 


-A 
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3. *./ multiplicação e divisão A*B, A/B 

4. adição e subtração A+B, A-B 

Para alterar a ordem dos cálculos use parênteses ( ). 

A ordem de precedência é mantida dentro dos parênteses. 


DIV e MOD (divisão de inteiro) 

DIV é denotado pelo sinal \ (barra invertida) no MSX-BASIC. Ele executa 
uma divisão dc inteiro. O resto desta divisão é dado pelo MOD. 

O que são DIV c MOD? Eis um exemplo para ilustrar seus usos. Numa divisão 
normal, se você dividir 10 por 4, irá obter 2.5. 

De maneira similar, 

13/5 = 2.6 

Entretanto, em uma divisão de inteiro você não obtém o ponto decimal, mas em 
vez disso obtém a parte inteira do resultado da divisão, 2 e um resto, 3. 

No MSX-BASIC, se você executar 1 3 DIV 5 obterá: 

13\5=2...a parte inteira do número. 

Se você executar 13 MOD 5=3. ..o resto da divisão. 

As operações aritméticas divisão de inteiro e resto são executadas com 16 bits. 
Antes do cálculo ser feito, qualquer não inteiro é convertido para inteiro por meio de 
truncamento, isto 6, todas as partes fracionárias são descartadas. 

16.78\5.89 = 3 (é o mesmo que 16\5 = 3) 

16.78 MOD 5.89 =1 (é o mesmo que 16 MOD 5 = 1) 

MOD segue DIV (\) na ordem dc precedência. 

Exemplo : Mostrando a ordem de precedência de MOD e DIV: 


1580 MOD 789 DIVIO 
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1. 789 DIV 10 

78 

2. 1580 MOD 78 

. 20 

isto é, 1580 MOD 789\10 = 20. 


OPERADORES RELACIONAIS 


Operadores relacionais comparam dois valores e retornam uma resposta 
verdadeira (-1) ou falsa (0). Eles são normalmcntc usados cm condições IF THEN, mas 
podem ser incorporados em uma expressão. 


OPERADOR RELACIONAL 

EXEMPLO 

- 

Igual a 

A=B 

< > 

Diferente de 

A < > B 

< 

Menor que 

A < B 

> 

Maior que 

A > B 

< = 

Menor ou igual a 

A < =B 

> = 

Maior ou Igual a 

A» =B 


Verdadeiro retorna -1. Falso retoma 0. 

Quando existir uma mistura de operadores relacionais e aritméticos, os últimos 
terão precedência. 


Exemplo 

A*B = C 

A*B é executado primeiro, e então o resultado é comparado com C. 

Operadores relacionais são tratados em detalhes na seção IF/THEN/ELSE 
(Capítulo 35). 



Como a maioria dos seres humanos deste planeta tem dez dedos cm suas mãos, 
eles usam o sistema de numeração decimal. Ao contrário do fwmo sapiens , os 
computadores, que são basicamente uma imensa matriz de chaves, podem ter somente dois 
"dedos” - LIGADO e DESLIGADO (ou, em ouLras palavras, 0 e 1). Desse modo, os 
computadores trabalham cm hinário, intemamente, o tempo todo. Para conforto dos 
usuários, eles exibem os números em decimal mas, naturalmente, eles também podem 
trabalhar com niímeros binários em programas de usuários. Além do sistema bináno, o 
MSX pode usar o sistema octal e o hexadecimal. Tanto os hexadecimais como os octais e 
binários sfio nümeros inteiros c devem estar dentro da faixa de inteiros, isto é, entre 
-32768 e 32767. 

As funções aritméticas são calculadas no sistema Binário Codificado em 
Decimal (BCD), que será explicado mais adiante. 


BINÁRIO 

Definição: Sistema numérico de base 2. Usa o 0 c o I para representar 

todos os numeros. 


MSX-BASIC &B <binário> representa um número binário. BIN$ muda de 
decimal para binário. 
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Cada dígito de um número binário é chamado “bit”. 8 bits são chamados de um 
“byte”. Um byte é o tamanho dc um endereço de memória no sistema MSX. Um byte pode 
conter qualquer valor entre 00000000 a llllllll, ou de 0 a 255 cm decimal. 


DECIMAL 

BINÁRIO 

EM 8 BITS 

0 

0 

00000000 

4 

1 

00000001 

2 

10 

00000010 

3 

11 

oonoooi i 

4 

100 

00000100 

5 

101 

OOG001D1 

6 

110 

OOCOOIIO 

7 

111 

00000111 

8 

1000 

00001000 

o 

10U1 

00001001 

10 

1010 

00001010 

ii 

1011 

00001011 

ip 

1100 

00001100 

13 

1101 

00001101 

14 

1110 

00001110 

15 

1111 

00001 1 1 1 

Ifi 

10000 

0001 0000 


Conversão de binário para decimal 
e de decimal para binário 

Como converter númetos binários de 8 bits para o seu decimal equivalente. 


NÚMERO DO BIT 

CORRESPONDE A 

VALOR 

7 

2 A 7 

128 

6 

2 a 6 

64 

5 

2 a 5 

32 

4 

2 a 4 

16 

3 

2 a 3 

a 

2 

2 a 2 

4 

1 

2 a 1 

2 

0 

O 

< 

C\l 

1 
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Exemplo: Converter 10110001 para decimal. 


I 0 1 1 0 0 0 1 



1 x 2"0 = 1 
0 x 2*1 = 0 

0 x 2*2 - 0 

0x2'3-0 

1 x 2 4 = 16 
I x 2*5 = 32 

0 x 2*6 = 0 

1 x 2*7 = 128 

177 


bináro decimal 

&B101 10001 = 177 

Como converter niímeros decimais em binários. 


Exemplo: Converter 53 em binário. 


BIT NÚMERO 


7 

2 a 7 

128 


0 

6 

2 a 6 

64 


0 

5 

2 a 5 

32 

Õ3 32=21 

1 

4 

2 a 4 

16 

21-16=5 

1 

3 

2 a 3 

8 


0 

2 

2 a 2 

4 

5-4=1 

1 

1 

2 a 1 

2 


0 

0 

2 A 0 

1 

1-1=0 

1 


Arranje os bits e você terá 53 = &B001 10101. 
Em BASIC: 


Como converter um número binário de 8 bits em seu decimal equivalente. 
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Exemplo: 



10 X7.-l.B00 101 011 
20 PRINT XX 
run 
43 



Como converter um 

número decimal em seu equivalente binário. 


10 XX- 171 

20 PRINT BIN*<XX> 

run 

101O10L 1 




OCTAL 


Definição: 

lím sistema numérico na base 8. Ele usa números entre 0 e 7 
para representar todas os números. 

MSX-BASIC; 

&0 <octal> representa um número octal. OCT$ de decimal 
para octal. 

DECIMAL 

OCTAL 

0 

0 

1 

1 

2 

? 

3 

3 

4 

4 

5 

5 

6 

6 

7 

7 

8 

10 

9 

11 

10 

12 

11 

13 

12 

14 

13 

1b 

14 

16 

1b 

17 

16 

20 
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Conversão decimal para octal e octal para decimal 

Como converter um número octal para o seu decimal equivalente: 

<decimal> = < 1- dígito > -tí A o-f- < 2 - cígito > 

*8 A 1 + <"3- dígito v .8 A 2+ <4° dfgitov -8 A 3... 


Exemplo: Octal & 05 4 36 para decimal. 

6-8 A 0+3*8 A 2 + 5»8 A 3=2B46 
805436=2846 

Como converter números decimais para octais. 


Exemplo: Decimal 6588 para octal: 


níci ro 

DECIMAL 

DIVISÃO INTEIRO 


MÓDULO OCTAL 


4 

8 4 

4096 

6588 Dl V 4096 - 

1 

6588 MOD 4096 - 

2492 

3 

8*3 

512 

2492 Dl V 512 = 

4 

2492 MOD 512 - 

444 

2 

8 2 

64 

444 1)1 V 64 = 

6 

444 MOD 64 = 

60 

1 

8*1 

8 

60 DIV 8 = 

7 

60 MOD 8 - 

4 

0 

8 0 

8 

4 DIV 1 - 

4 




De modo que você obtém &O0 1 4674 = 6588 (decimal). 


Em BASIC 


Como converter um número octal para o seu decimal equivalente. 


10 X •/.=?< 06517 
20 PRINT XV. 
run 
3407 


Exemplo: 
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Como converter uni número decimal para o seu equivalente octal. 

Exemplo: 


tô XX-171 


20 PR IN! UCT»(XX) 

r un 


253 


HEXADECIMAL 


Definição: 

Um sistema numérico com base 16. Ele usa números entre 0 e 
9 e adicionalmente A, B, C, D, E e F para representar todos os 
números hexadecimais. 

Em BASIC: 

&H ^hex> representa um número hexadecimal 
HEX$ converte de decimal para hexadecimal. 

DECIMAL 

HEXADECIMAL 

n 

0 

1 

1 

? 

2 

3 

3 

4 

4 

5 

5 

6 

b 

7 

7 

8 

8 

9 

9 

10 

A 

11 

R 

12 

C 

13 

D 

14 

E 

15 

F 

16 

10 
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Conversão de hexadecimal em decimal 
e de decimal em hexadecimal 

Como converter um número hexadecimal para o seu equivalente decimal: 

<deoimal> = <rprim.dfgito> *16 A 0+ <seg.drgHo> *16 A 1 + <tcrc.dígito> 

*6 A 2+ <quar.drglto> •16 A 3... 


Exemplo: &HFF para decimal. 

(&HF)«16 a 0+(&HF)-16 a 1 =(15)*1 +(15)*16=255 

&HFF=255 

Como converter números decimais para os seus equivalentes hexadecimais. 


Exemplo: Decimal 7752 para hexadecimal. 

DÍGITO HEXADE 

DECIMAL D IVISÃO INTEIRO CIMAL 

3 16 3 4096 7752 Dl V 4096 - 1 

2 16 2 256 3656 Dl V 256 - EU 4) 

I 161 16 72 DIV 16= 4 

0 16*0 I 8 DIV I = 8 

De modo que você obtém &H1E48 = 7752 (decimal). 


Em BASIC 

Como converter um número hexadecimal no seu equivalente decimal. 


Exemplo: 

10 X7.=I<HEFA3 
2e PRINT X7. 
run 
-4189 


MÓDULO 

7752 MOD 4096 = 3656 

3656 MOI) 256 - 72 

72 MOD 16 - 8 
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Como converter um mímero decimal no seu equivalente hexadecimal. 


Exemplo: 


10 X7.= I 7 i 
20 PRINT HEX* <*-/.) 
run 
AB 


Notas: 


1. Binários são freqüentemente usados quando se projeta um sprite porque toma 
fácil de se ver o padrão dos bits. 

2. Hexadecimal é usado na descrição de localizações de memória e em 
programas em inguagem de máquina. 


RESUMO DE DECIMAL, BINÁRIO, OCTAL E HEXADECIMAL 


DECIMAI 

BINÁRIO 

OCTAL 

HEXADECIMAL 

0 

0 

0 

0 

1 


1 

1 

2 

10 

2 

2 

3 

11 

3 

3 

4 

100 

4 

4 

5 

101 

5 

5 

6 

110 

6 

6 

7 

111 

7 

7 

8 

1000 

10 

8 

9 

1001 

11 

9 

10 

1010 

12 

A 

11 

1011 

13 

B 

12 

1100 

14 

C 

13 

1101 

15 

D 

14 

1110 

16 

E 

15 

1111 

17 

F- 

16 

10000 

20 

10 
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SISTEMA DECIMAL CODIFICADO EM BINÁRIO 


O MSX liabalha com funções aritméticas com precisão dupla de até 14 dígitos. 
Isto significa que as operações aritméticas não geram os erros de arredondamento que 
estão in varia ve lmente associados a muitos sistemas de computadores de 8 bits. Todas as 
operações e funções aritméticas são calculadas com essa precisão a menos que se 
especifique outra precisão pelo programa do usuário. 

Por que usar decimal codificado em binário? Qual é a vantagem e por que é mais 
preciso? Antes dc iniciar, vamos ver como trabalham os mi meros no sistema binário, que é 
o mais adequado para os computadores. 

Em binário, se você tentar representar um número menor que 1 (isto é. um 
número com ponto decimal), muitas vezes incorrerá em erros, lixistem certos números que 
podem ser expressos em decimal mas não em binário. 

Digamos que queremos converter 0.6525 para binário: 

0.625 = 1/4+1 /8=1/(2 A 2)+1/(2 A 3) 

0.625 = 2 a (-?)+? a (-3) 

Dc modo que vocó pode converter 0.625 para binário sem qualquer problema. 
Entretanto, quando se tem um número parecido com 0.1, você não pode fazer isso. Não 
existe modo de se expressar 0.1 em binário de forma exata. A seguir mostramos por que: 

0.1 = 1/16+1 /32 + 1 /256 +1/512+1 /4096 + 1/8192 + 1 /65í>3fi... = 0.09999... 


OU 


U.1 =* 1/(2 A 4) + 1/(2 A b) + 1/(2 A 8) + 1/(2 A 9) + 1/(2 A 13) + 1/(2 A 16)+... - 0.099999... 

Você não consegue obter 0.1 em binário; em vez disso você obtém uma série. 

Em vez de transformar um decimal completamente em binário, o MSX usa o 
decimal codificado cm binário. 

O sistema decimal codificado em binário usa 4 bits binários para representar um 
dígito em decimal. Isso significa que 0001 corresponde a 1 e 0010 corresponde a 2, e 
assim por diante até 1001 que é o 9. Os 4 bits binários entre 11 e 15, isto é, 1010, 1011, 
1 100, 1101 e 1 1 10 e 1111 não são usados no sistema decimal codificado em binário. Em 
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vez disso, a casa decimal (10) é representada nos próximos 4 bits - assim, 10 é 0001 0000 
em BC D. 1 byte (8 bits) representar? dois dígitos decimais. 


0 

0000 

OOÜO 

10 

0001 

0000 

Ml 

90 

1001 

0000 

1 

0000 

0001 

11 

0001 

0001 

... 

91 

1001 

0001 

2 

0000 

0010 

12 

0001 

0010 

••• 

92 

1001 

0010 

3 

0000 

0011 

13 

0001 

0011 

••• 

93 

1001 

0011 

4 

0000 

0100 

14 

0001 

010C 

NI 

94 

1001 

0100 

5 

0000 

0101 

15 

0001 

0101 

••• 

95 

1001 

0101 

6 

0000 

0110 

16 

0001 

0110 

Ml 

96 

1001 

0110 

7 

ooco 

0111 

17 

0001 

0111 

«•» 

97 

1001 

0111 

8 

0000 

1000 

18 

0001 

1000 

IM 

98 

1001 

1000 

9 

ooco 

1001 

19 

0001 

1001 

• •• 

99 

1001 

1001 


Números de 8 bits com precisão dupla em BCD 

O MSX armazena dados numéricos em precisão dupla, a menos que seja 
programado dc outra forma. Ele tem uma precisão de 14 dígitos e é armazenado em 8 
bytes no sistema decimal codificado em binário, ü primeiro byte armazena o expoente c os 
outros bytes dão os 14 bytes, ou seja, 2 dígitos por byte. 

Para ver como os dados numéricos são armazenados, em primeiro lugar pesquise 
a localização desse dado usando a função VARPTR, c então “espie’’ (PEEK) o conteúdo 
e o imprima em hexadecimal. 


10 PI =3. 14159265340?# 

20 DIREC-VORPTR (PJ > 

30 FUK 1-lHREC Tü DIREC+7 
40 PR1NI HEX*<r'EEKU) >; " . "í 
30 NEXT I 
60 PRINT 


run 
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Vamos analisar o que foi exposto: 

41 31 41 59 26 53 58 97 

v 1 ' ' 

7 bytes BCD para 14 dígitos 

0 1000001 

1 — i — 1 

1 7 bits para o expoente, ou seja, 65 é subtraído de 65 

oara se obter EOO 

ind cador positivo ou negativo (•♦ =0)(— = 1 ) 

O byte da ponta fomccc o sinal positivo ou negativo e o expoente. Para obter 
o valor exponencial, primeiro ignore os 7 bits e calcule o valor decimal para o resto, isto 
é, do sexto ao primeiro bit; então subtraia 65. Isto fornece um mímeru com tamanho 
entre IE - 64 c 9,99999999999999E62. 


VANTAGENS E DESVANTAGENS DO SISTEMA DECIMAL 
CODIFICADO EM BINÁRIO 


Vantagens: 

1. O BCD não produz erros de arredondamento e pode fornecer ndmerus que 
são impossfveis em binário como 0.1. 

2. É extremamente fácil exibir um ndmero BCD porque não é necessário 
converter binário para decimal. Isso aumenta a velocidade do processo dc 
impressão na tela. 


Desvantagem: 

1. Devido ao fato de não ser realmenle binário, o computador gasta mais tempo 
na computação dc operações aritméticas. Entretanto, a CPU Z80 tem um 
comando especial DA A (Decimal Adjust Accumulator = Acumulador de 
Ajuste Decimal), para tomar esse processo mais fácil. O comando DAA 
converte o conteúdo do acumulador para BCD compactado seguindo à 
subtração ou adição, com operandos de compactação BCD. 



CAPITULO 34 


ÁLGEBRA BOOLEANA I 
(EXPRESSÕES LÓGICAS) 



INTRODUÇÃO 


Por menor que pareça o seu MSX, ele ainda é um computador, e um computador 
6 basicamente feito de milhões de chaves. Elas podem ser LIGADAS ou DESLIGADAS, 
mas combinações delas criam um computador que trabalha. A Irfgica de um computador, 
ou uma imensa penca de chaves se você quiser, é governada por um conjunto de regras 
que são conhecidas como Álgebra Booleana. Ela é usada principalmcntc cm situações de 
múltiplas condições, cm comandos IF/THEN, com ANDs e ORs; você também pode 
usá-la em programas em linguagem de máquina. 


OPERADORES LOGICOS DO MSX 


0 MSX fornece Operadores Booleanos (lógicos), apesar de alguns micros dc 8 
bits parecerem tê-los esquecido. Eles são muito importantes cm programação avançada. 
Eis uma lista dos mesmos em ordem de precedência. 

Jargáo dc computação 

1 NOT Compiemento 

2 AND AND lógico 

" ló7 
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3 

OR 

OR lógico 

4 

XOR 

OR exclusivo 

5 

EQV 

Equivalente 

6 

IMF 

Implicação 


NOT, AND e OR são operadores importantes, já que eles são os operadores lógicos mais 
comumente usados; e, por outro lado, os outros, isto é, XOR, EQV c TMP, podem ser 
derivados de combinações dos operadores NOT, AND e OR. 

Operações lógicas são sempre executadas com números inteiros. Qualquer 
argumento que não seja um inteiro é convertido para 16 bits, com sinal, com complemento 
de dois inteiros. 

Agora iremos ver como eles funcionam c para que eles podem ser usados, uni a 
um, iniciando com NOT. 


NOT 


NOT é uma negação. Ela fomccc verdadeiro para falso e falso para verdadeiro 
(por exemplo: 1 para 0 e 0 para 1). Em outras palavras, ela nega um argumento. 

Eis a tabela do verdade para NOT. 


NOT 

X 

NOT X 


0 

1 


1 

0 

NOT X 100 

0000000001100100 


-101 11111111 1001 101 1 


AND 


As operações algébricas booleanas de AND podem ser listadas em uma tabela da 
verdade como mostrada abaixo: 


X 

0 

1 

0 

I 


Y 

0 

0 

1 

1 


X AND Y 
0 
0 
0 
1 


AND 
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Dessa forma, digamos que 50 AND podem ser calculadas como a seguir: 

X 100 0000000001100100 

AND Y 50 00000000001 100 10 

32 0000000000100000 

Exemplo: Uso do AND 

O AND lógico pode ser usado para testar uni bil de um niinieru em particular. 
Por exemplo, se y = 2 A N, onde n é o bit de teste entre 0 e 7, então X AND Y = Y se o 
bit de teste n for 1 e X AND Y = 0 se o bit de teste n for 0. 


TESTE o quinto BIT (n=5) para X = 117. 

Y = 2*5 = 32 

X 117 0000000001 1 10101 

AND Y 32 00000000000 10000 

32 0<XXXXKXXNX)IIXXK1 

Assim, o quinto bit do nümcro 117 é 1. isto é, verdadeiro. 


OR 


Quando ou X ou Y ou ambos forem verdadeiros, OR irá retomar verdadeiro. O 
OR lógico 6 algumas vezes chamado soma lógica. 

A tabela da verdade do OK é: 

OR X Y 

0 0 

0 1 

1 0 

1 1 

Exemplo: 34 OR 67 

X 34 OOOOOOOOCOIOOOIO 

OR Y 67 OOCOOOOOC 10000 11 


X OR Y 
0 
l 
l 
I 


99 000000000 1 1 000 1 1 
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Exemplo: Uso de OR lógico 

OR lógico pode ser usado para converter um caractere de maiuscula para 
minúscula, já que a diferença entre o código ASCII dos caracteres maiúsculos e 
minúsculos é constante, isto é, 32 (2 A 5). 


Exemplo: Altere o caractere A (código ASCII 65) para a (código ASCII 97). 

A 65 000000000 1 000001 

OR 2 5 32 0000000000100000 

ã 97 0000000001100001 

Este método é totalmente flexível, porque se você tentar converter um caractere 
maiúsculo em minúsculo, nada acontece. Tente você mesmo. 


XOK 


XOK, OR exclusivo retoma verdadeiro (1) quando X e Y são diferentes. 


Y X OR Y 

0 0 

1 1 

0 1 

1 0 

Exemplo: 100 XOR 50 

X KM) 000000000 1100100 

XOR Y 50 00000000001 10010 

86 000000000 10 101 10 


XOR X 

0 
0 
1 
1 


XOR pode ser calculado usando NOT, AND e OR. Eis como fazer. 


X XOR Y = (X AND(NOT Y)) OR ((NOT X)AND Y) 

Dessa forma, em português ciaro, XOR é ou X E NÃO Y OU NÃO X E Y. 
X XOR Y = (X ANDÍNOT Y)))OR((NOT X)AND Y) 
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Pr uva: 



X 

Y 


NOT 

X NOT Y 



0 

0 



1 

1 



1 

0 



0 

1 



0 

1 



1 

0 



1 

1 



0 

0 



X 

(NOT 

Y) 


X AND (NOT Y) 



0 


1 



0 



1 


1 



1 



0 


0 



0 



1 


0 



0 



(NOT Xl 



Y 


(NOT X) AND Y 



1 



0 


0 



0 



0 


0 



1 



1 


1 



0 



1 


0 


(X AND(NOTY)) 

UNOTX1ANDY) (X AND (NOT Y» 

OR ((NOT X) AND Y) 

0 



0 




0 

1 



0 




1 

0 



1 




1 

0 



0 




0 


Assim, X XOR Y = (X ANLXNOT Y)) OR ((NOT X) AND Y) 

Exemplo: Uso de XOR 

XOR tem a propriedade única taJ que se você avaliar um valor XOR com outro 
valor duas vezes, você terá o valor original dc volta. 


X XOR V XOR Y = X 


Vamos tentar 

100 XOR 50 XOR 50 curao exemplo: 

100 XOR 

50 


X 

100 

0000000001100100 

XOR Y 

50 

0000000000110010 

100 Y 

86 

0000000001010110 


llOO XOR 50) XOR 50 

X 86 0030000001010110 

XOR Y 50 0000000000110010 


100 0000000001 100100 
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Dessa forma 100 XOR 50 XOR 50 = 100 


EQV 


lista 6 a função de equivalência lógica. EQV retoma verdadeiro sempre que 
X e Y forem iguais e falso quando diferentes. 

EQV X Y X EQV Y 

0 0 1 

1 0 0 

0 1 0 

1 1 1 

Exemplo: 51 EQV 75 

X 51 0000000000 II 00 II 

EQV Y 74 0000000001001010 

-122 1111111110000110 
A seguinte relação 6 verdadeira. 

X EGV Y = (X AND Y) OR ((NOT X) AND (NOT Y)) 


Prova : 


X 

Y 

NOT X 

NOT Y 

0 

0 

1 

1 

1 

0 

0 

1 

0 

1 

1 

0 

1 

1 

0 

0 

X 

Y 

(X AND Y) 


0 

0 

0 


1 

0 

0 


0 

1 

0 


1 

1 

1 


(NOT X) 

(NOT Y) 

((NOT X) AND (NOT Y» 


1 

1 

1 


0 

1 

0 


1 

0 

0 


0 

0 

0 
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((NOT X) AND (NOT Y)) 
1 
0 
0 
1 

Dessa forma, 

X EQ Y = (X AND Y>OR«NOT X) AND (NOT Y)) 


(X AND Y) ((NOT X) AND (NOT Y)) (X AND Y) OR 
ü I 

0 0 

0 0 

1 0 


IMP 


Tabela da verdade IMP 


IMP 



X IMP Y 
1 
0 
1 
1 


100 IMP 50 pode ser calculado como a seguir: 

X 100 0000000001 10011X) 

IMP Y 50 00000000001 100 10 

— 69 1111111110111011 


A seguinte relação é verdadeira. 


X IMP Y = (NCT X) OR Y 

Prova : 


X Y NOT X 

0 0 1 

1 0 0 

0 1 1 

1 1 0 
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(NOT X) Y 

1 0 

0 0 

1 1 

0 I 


(NOT X) OR Y 
l 
0 

1 

I 


Dessa forma, X IMP Y = (NOT X) OR Y 

Vimos o que o MSX faz com relação à álgebra de Boole. Existem muitas outras 
funções dteis como NOR e NAND que não estão incluídas no MSX mas que podem ser 
simuladas usando NOT, AND e OR. Lembre-se de que essas três funções são a base da 
álgebra booleana e que podem ser combinadas para formar outras. 

Dê uma olhada na tabela a seguir: duas variáveis binárias, X e Y, que podem ter 
cada uma o valor 1 ou 0. Lias podem ter quatro combinações de 0 e 1, já que 2 A 2 = 4. 
Existem 16 combinações dessas combinações (ou funções), jó que 2 A 2 A 2 = 16. O que 
você tem é uma lista de todas as combinações possíveis ou tabelas da verdade. 


X 

Y 

fU 

f! 

f2 

Í3 

Í4 

f5 

Í6 

f7 

f8 

f9 

fio 

Ml 

f 1 2 

f 1 

f 1 4 

fl 

0 

0 

0 

0 

1 

0 

1 

0 

0 

0 

1 

0 

1 

1 

1 

0 

1 

1 

0 

1 

0 

0 

1 

1 

0 

0 

0 

1 

0 

1 

1 

0 

1 

1 

0 

1 

1 

0 

0 

1 

0 

0 

1 

0 

1 

0 

0 

1 

0 

1 

1 

1 

0 

1 

1 

1 

0 

1 

0 

1 

0 

1 

0 

0 

0 

1 

1 

1 

0 

0 

1 

1 


Você pode reconhecer o seguinte: 

f2 é NOT 
Í5 é AND 
f9 è on 
M3 ô XOR 
m é iMP 
f14 é EQV 

Elas estão todas no MSX-BASIC; mas, e a respeito das outras, comò as 

f 1 , f3 etc? 

Nesta seção iremos ver os operadores lógicos que não são do MSX. Eles podem 
ser usados no MSX como expressões equivalentes feitas com NOT, AND e OR. 
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fO Sempre lunçáo falsa, qualquer que seja a combinação de X e Y. Não usada 

em computação. 

Í1 Sempre X, qualquer que seja o valor de Y. 

f2 NÃÜ X (veja NOT). 

f3 Sempre Y, qualquer que seja o vabr de X. 

f4 NOT Y (veja NOT). 

Í5 X AND Y (veja AND). 

f6 X AND (NOT Y). 

f7 (NOT X) AND Y. 

f8 Função NOR. Seus equivalentes no MSX são (NOT X) AND (NOT Y) OU. 

allernativamente. NCT (X OR Y) ... Veja a Lei de De Morgan. 

19 X OR Y (veja OR lógico). 

flO ((NOT X) OR Y) Similar a IMP. 

Ml X IMP Y (veia IMP). Similar a 110. Alternativamente X OR (NOT Y). 

Í12 Função NAND. Lia é a negação de AND (NAND é a abreviatura dc NOT 
AND). 

NOT (X AND Y) 

(NOT X) OR (NOT Y) 

X NAND Y = (NOT X) OR (NOT Y) = NOT (X AND Y) 

Veja a Lei de De Morgan mais adiante. 

f 1 3 X XOR Y. OR exclusivo (veja XOR). Alternativ/amente (X AND (NOT Y)) OR 
((NOT X)) AND Y). 

tu X EQV Y. Equivalência lógica. 

X EOV Y = (X AND Y) OR ((NOT X) AND (NOT Y)). 
tis Sempre vordadoiro. qualquer que seja o valor de X e Y. Não usado. 

NAND c NOR. ambos não incluídos no MSX-B ASIC, são funções riteis para se 

lembrar. 


ALGUMAS RELAÇÕES LÓGICAS ÚTEIS 


Lxiste uma variedade de relações lógicas que podem ser usadas na álgebra 
booieana, por exemplo, para reduzir expressões lógicas muito longas através da 
minimização. 
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USANDO OR LÓGICO 

1. X OR 0=X 

2. X OR X=X 

3. X OR X OR X OR X OR...=X 

4. X OR (NOT X) = 1 

5. X OR 1 = 1 

6. X OR (X AND Y) = X 

7. X OR ((NOT X) AND Y) = X OR Y 

USANDO AND LÓGICO 

1. X AND 0=X 

2. X AND X=X 

3. X AND X AND X AND X AND„.=X 

4. X AND (NOT X) = 1 

5. X AND 1 = I 

a X AND (X AND Y) = X AND Y 
7. X AND ((NOT X) AND Y) = 0 


lixemplos: 


Tente alguns dos seguintes exemplos em seu computador e veja se as relações 
abaixo s5o real mente verdadeiras : 


RESPOSTAS 

PRINT 145 OR 0 14b 

PRINT 167 OR 167 167 

PRINT 167 OR 167 OR 167 167 

PRINT 133 OR (133 AND 222) 133 

PRINT 111 ANDO 0 

PRINT 111 AND 111 111 

PRINT 111 AND 111 AND 111 AND 111 111 

PRINT 234 AND (NOT 234) 0 

PRINT 234 AND (234 OR 54) 234 
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LEIS DE t)E MORGAN 

À parte das relações anteriores, a álgebra booleana tem dois truques especiais 
para reduzir o comprimento das expressões lógicas. 

1. Negação do OR lógico 

A negação (NOT) de um OR lógico é o equivalente ao AND lógico de 
negações das variáveis significando o OR lógico, isso pode ser expresso por: 

NOT (X OR V) = (NOT X) AND (NOT V) 

2. Negação do AND lógico 

A negação de um AND lógico é o equivalente de um OR lógico das 
negações das variáveis relacionadas ao AND lógico. Isso pode ser expresso 
por: 

NOT (X AND Y) - (NOT X) OR (NOT Y) 


LEIS DE REARRANJAMENTO 


Lm matemática, existem leis que permitem que você rearranje c simplifique 
expressões complexas. Elas são conhecidas como as leis comutativa, associativa e 
distributiva. A álgebra booleana tera leis similares como as seguintes: 

1 . Leis comutativas 

a) X OR Y = Y OR X 

b) X AND Y = Y AND X 

2. Leis associativas 

a) X AND (Y AND Z) = (X AND Y) AND Z = X AND Y AND Z 

b) X OR (Y OR Z) = (X OR Y) OR Z = X OR Y OR Z 
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3. Leis da distribuição 

a) X AND (Y OR 7) = (X AND Y) OR (X AND Z) 
h ) X OR (Y AND Z) = (X OR Y) AND (X OR Z) 


Resumo das Tabelas da Verdade dos 
Operadores Lógicos do MSX 


X 

Y 

AND 

OR 

XOR 

EQV 

IMF 

0 

0 

0 

0 

0 

1 

1 

I 

0 

0 

1 

1 

0 

0 

ü 

1 

0 

1 

1 

0 

1 

1 

1 

1 

1 

0 

1 

1 



CAPÍTULO 35 


ALGEBRA BOOLEANA 
O IF/THEN/ELSE 


Quando você está escrevendo um programa de computador, é muito provável 
que o computador tenha de tomar decisões por si mesmo enquanto estiver rodando o seu 
programa. Para tomar decisões soh certas condições, use o comando IF para primeiro 
testar as condições, e então executar certas tarefas dependendo do resultado. ÍF é sempre 
usado junto com THEN c algumas vezes com ELSE. Existem dois tipos de formatos 
básicos: 

IF < condições > THbN <comandos> 
e 

IF <condições> THEN <comandos> ELSb <comandos> 

IF é seguido pela condição a ser testada. Sc <■ condições > for verdadeira, então 
o computador executa os < comandos > após a palavra THEN. Se o computador descobrir 
que < condições > não 6 verdadeiro, sc não existir a palavra FASE nessa linha, ele irá 
executar a linha seguinte sem executar < comandos > após o THEN. 

Entretanto, se existir uma palavra FI.SE dentro dessa linha e < condições ^ for 
falsa, os < comandos > após ELSE serão executados. Neste caso <comandos>, entre 
THEN e ELSE são coinpletainente ignorados. 

Para iniciar, vamos dar uma olhada na parte < condições > da estrutura 
IF < condições > THEN... ELSE. 
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< CONDIÇÕES > 


As < condições > seguem todas as regras c regulamentos descritos nos capítulos 
“Expressões e Operadores" e “Álgebra Booleana". Esta seção mostra o lado prático do 
que nós dissemos nos últimos dois capítulos. 


COMPARAÇÃO NUMÉRICA 


A condição mais simples compara dois valores; por exemplo, cias podem 
comparar se um número é maior que outro. Elas usam os operadores relacionais, como 

<:, o, =, <=, > = 

Exemplos: 

1. 15 < 0 retorna 0 ( 4 also) 

2. a%-67 reterna -1 (verdadeiro sc 67) 

0 (falso se a% não for 67) 

No formato IFTHEN: 

1. IF H%=1C0 THFN PRINT W D% t 100" 

2. IF V < -GTHEN PRINT M V < -C" 

Existem formas mais simples, mas você pode também usar expressões 
aritméticas em ambos os lados do operador relacional. 

1. IF F%«H%“9876 THEN PRINT •'VERDADEIRO*' 

2. IF 2 A 8=N%-1919»Y% THFN PRINT “VERDADE IRO* 


Também não existe razão por que você não possa usar funções do BASIC como 
COS, INSTR etc. De fato. você pode mesmo incorporar uma função FN definida pelo 
usuário, também. 

1. IF INSTR[A$,B$i=5 THEN PRINT B$ 

?. IF COS(0.624?) > =TAN(D%) THFN PRINT “VERDADEIRO" 

3. IF FNA(D%«I%-100)=&HFF THEN PRINT “FF" 
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CONDIÇÃO NUMÉRICA SEM COMPARAÇAO 


Não é estritamente necessário ter uma relação como < condição. De fato, ela 
pode ser uma variável numérica simples ou somente uma expressão. Dê uma olhada 
neste exemplo: 

IF X% THEN PRINT w X%=VERDADEIHO" 

Neste caso o computador toma a condição como verdadeira quando a variável 
X.% for diferente dc zero c falsa quando X% - 0. 

Geralmente; 

IF < expressão THEN < comando > 

< expressão > = Verdadeira, quando <exprcssão> retomar não zero. 

< expressão > = Falsa, quando <expressão> retomar 0. 

Você pode usar isso em uma grande variedade de situações. Eis alguns exemplos 
para ilustrar este ponto. 

1 . IF A < >0 THEN PRINT -A NÃO 0" 

... pode ser 

IF A THEN PRINT “A NÃO 0* 

2. Para verificar se existe um cerlo caractere dentro de uma strinq. 

IF INSTR(S$,“A") THEN PRINT “S$ CONTÉM O CARACTERE 'a’'' 


COMPARAÇÃO DE STRINGS 

Você pode comparar duas strings usando operadores relacionais de modo 
muito semelhante. A comparação é feita tomando um caractere por vez de cada string e 
comparando os códigos ASCII. Sc os códigos ASCII diferirem, o nümero de código de 
minúscula precede o maior. Para aqueles caracteres que correspondam ao código ASCII, 
veja a tabela de códigos ASCII. Se durante a comparação de strings o final de uma string 
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for encontrado, a string rnais curta será dita como sendo a menor. Comparação de strings 
podem ser asadas para colocá-las em ordem alfabética. 

No seguinte exemplo, todas as condições são verdadeiras. 

1 . “abc" = "abc* 

2 . -ABC- < “abc" 

3. -ABC" < "ABD" 

4. -ab" < “abc" 

5. -1234- < -12345" 


CONDIÇÕES MÚLTIPLAS DE TESTE 
USANDO OPERADORES BOOLEANOS 


É possível testar condições múltiplas em uma rodada, usando operadores lógicos 
booleanos. Existem 6 operadores lógicos no MSX-BASIC, mas somente 3 deles, NOT, 
AND e OR, são relevantes. Eles governam todas as regras da álgebra booleana, como 
as Leis de De Morgan. 

1. Uso simples do AND. 

IF < condição- 1 > OK <condição-2^ THEN <co mando >. 

Neste caso, se somente ambas as condições forem verdadeiras, o computador 
irá executar o comando após o < comando >, isto é: 

IF X=0 AND Y$="SIM" THEN PRINT “ÓTIMO" 

2. Uso simples do OR. 

IF < condição-1 > OR <condição-2> THEN < comando >. 

Neste caso, se uma ou ambas as condições for verdadeira, então computador 
irá executar o < comando > após THEN, por exemplo: 

IF X=0 OR Y=0 THEN PRINT -UM DELES É ZERO" 

3. Uso simples do NOT. 

IF NOT <condição> THEN < comando. 
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Se a condição for verdadeira, então NOT < condição > retoma o oposto, isto 
é, falso; e vice-vcrsa, por exemplo: 

IF NOT (V=U-8) THEN PRINT “V NÃO É U*8" 

Agora, você deve ter notado que não tem sentido usar NOT na relação abaixo, 
quando você pode reescrevê-la como: 

IF V O U-8 THEN PHINT M V NÃO U-8'" 

Ris uma lista dc tais relações que têm o mesmo significado. 


NOT(X=Y) X < > 

NOT(X < > Y) X=Y 

NOT(X < =Y) X < Y 

NOT(X > -Y) X < Y 

NOT(X > Y) X < =Y 

NOT(X < Y) X > =Y 


Desse modo, não desperdice a memõria do seu computador. O que NOT pode 
fazer é o reverso do resultado de uma expressão como: 

IF NOT INSTR(A$,Y') THEN PRINT "Y NÃO ESTÁ NA STRING A$" 

O exemplo a seguir é auto-explicativo. 


MINIMIZAÇAO - A LEI DE DE MORGAN 

NEGAÇÃO DO OR LÓGICO: 

Os três exemplos abaixo têm o mesmo efeito: 

IF NOT (X=9 OR Y = 10) 

IF NOT (X=9) AND NOT (Y=10) 

IF X < > 9 OR Y < >10 


Sc estiver em dúvida, tente-os e veja por si prõprio. 
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ESTRUTURAS IF/THEN/ELSE 


ELSE é uma parte da estrutura 1F/THEN/ELSE. ELSE diz ao computador que 
se a < condição > em IF não for satisfeita (isto é. falsa), então pule os comandos após 
THEN e execute os comandos após ELSE. 

Comandos IF/THEN/ELSE múltiplos podem ser definidos bem como estruturas 
IF/TIIEN/ELSE. Elas só são limitadas pelo tamanho dc uma linha, que contém 255 
caracteres. Se existir menos cláusulas ELSE que THEN, então cada ELSE é comparado 
com o THEN mais próximo. 

IF THEN (IF TH EN EL SE) 

IF THEN (IF THEN (IF THEN ELSE» ELSE) ELSE 



IF/THEN/ELSE múltiplos 

IF TH EN E^ SE IF TH EN E^ Sí: ... 

O segundo comando IF é executado após o primeiro comando ter sido dado 
como falso. 


Sintaxe 


O formato IF...THEN GOTO <linha> pode ser abreviado de duas formas: 

1. IF...THEN < linha > 

2. IF...GOTO <lirha> 

ELSE GOTO < linha> pode ser também abreviado: 

1. IF...THEN...ELSE <lmha> 

2. IF... THEN... GOTO <liriha> 
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Pontos a serem lembrados 

Os comandos IF/THEN/ELSE tendem a se tomar muito longos para caber em 
uma única linha, porque você pode ter múltiplos comandos após THEN e EI*SF. Se foro 
caso, então é aconselhável usar siib-rohnas usando o comando GOSUB. 

É bom evitar o uso de comandos fF4Tlll£N/ELSE em níveis, pois cies podem 
trazer muitos problemas. Você pode criar um programa tipo “espaguete" sem querer. 
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IMPRIMINDO COM O USING 


i 



INTRODUÇÃO 


O MSX tem um controle de formato de impressão bastante simples e poderoso. 
O comando PRÍNT LISÍNG permite que você imprima strings e números em vários 
formatos. 


Sintaxe 


PRINT USING <excressáo string > ; < lista de itens> 

Existem duas partes no argumento de PRINT USING - a string dc especificação 
do formato e a lista de itens a ser impressa. Elas são separadas por ponto e vírgula. A 
< lista dc itcns> pode ser número ou string. <expressão-string> contém a string especial 
de formatação que determina como os itens devem ser impressos. Ela pode ser ou uma 
string ou uma variável string. 
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EXPLICAÇÃO DE CARACTERES USADOS 
NO COMANDO PRINT USING 


! O ponto de exclamação especifica que o primeiro caractere da string é para ser 
impresso. 

Es um prograna-exempk), qL.e imprime somente as iniciais do primeiro rione e 
sobrenomes em limas DA A. 

10 FOR I = i TO 3 
'0 REAO NOMES. SBRNOKES 

30 PRINT USING " 1 " ; NOhFT» : " . " r SRPNOhF% 

40 NEXT I 

DAT A JOSE r MARCIO 
A0 PATA HAX r R TCK 
70 DATA ANDRE r MAÍ) 

& Insere uma string especificada na posição dada po' &. 

10 A<fi = "GUIERTYi" 

20 PRINT USING ~ESTE E UM TECLADO *"|A% 

♦ O sinal “ indica jm dígito a ser impresso. Por cxcmpo: PRINT USING 
••#.###"; 1.3 imprime 

1.300 

istc é. ele formata a núrcro a scr cx bido. 


Como você pôde ver no exemplo anterior, você pode incluir um ponto decimal 
na string de formatação, entre os sinais Se o número tiver menos dígitos que 

os especificados pela string de formatação, ele será alinhado à direita com espaços 
precedendo-o. 


10 PRINT "*#*#. ##*####" 

20 PRINT USING "####. » ATN<1>«4 


####. #### »mmi 

3- 1415927 
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Se os caracteres dc formatação especificarem mais casas decimais que o numero 
a ser exibido, os espaços vazios serão preenchidos com zeros. 


10 pRiNi "«lí.miMiir 

20 PRINT US1NG "## . •» **##•• ; 99. 999 


99.999000 


Os n meros serão arredondados se não couberem no campo especificado. 


10 PRINT »•• 

20 PRINT USINO "Hl*. UM*"; 10.2367 

»*.•«* 

10.237 


Você pode imprimir dois ou mais mímeros com o mesmo formato cm um 
comando PRINT USINO. 

10 PRINT USING “ i 9. 866, 18. 7 

9.87 18.70 

Se o número a ser impresso for negativo, entáo o sinal negativo será exibido, 
mas ele irá ocupar um digito dc espaço no especificador. 


IO PRINT ••###. ####" 

20 PRINT USING "#M. 2.63 

###.## 

-2.6300 


Se o nilmero a ser impresso não couber no campo especificado pelos caracteres 
dc formatação, um sinal de percentagem (%) será impresso na frente do número. Isto 
acontece quando o número arredondado exceder ao tamanho do campo. 


10 HHINI USl NU ”tt. 9. 7799 


7.10.000 




Imprimindo com o using 


189 


+ Um sinal de mais no início ou no fina da strng de formatação irá lazer com que o 
sinal do número seja impresso, isto 6, um " + '* ou posição especificada. 

10 PRINT USING "+•**- 5“. 173422, 10.906 
-O. 12342 MO.VO6O0 

10 PRINT USING "###*.#♦’•; 10.71, 100,-200- 1> 

10. /+ 100.04- 200.5- 


O sinal de duplo asterisco { az com que os espaços de sobra no campo numérico 
sejam preenchidos com Eles reoresentar também mais dois dígitos de 
espaços no campo. 


10 PRINT 

20 PRINT USING -«*#*. •#•»«*•*” I ATN < 1 ) *4 
30 PRINT USING «HM»" I ATN ( 1 > •'! 

■««3.14159265 
■ * 3.14159265 


$$ O sinal de duplo cifráo coloca jma sigla de cifrão na frente de um número. 
$$ especifica mais dois díuitos de esoaço, um dos quais será o sinal de cifrão. 


IO PR I NT 

20 PRINT USING »•»•#*#•" lATNtl) «4 

30 PRINT USING " **+•.»!•#•. !«•" I ATN<1)»4 

#.*»«#••*« 

*•3. 141559265 
♦-3. 141559265 


Observe que você não pode usar o formato exponencial junto com o sinal $$. 

**$ Este sina é uma cor-b nação dos sinais ** e $S. Todos os espaços em branco são 
preenchidos por * c o número é oreced do por um sinal $. **S esoecifica mais três 
posições de dfgitcs, una das quais é o sinal S. 
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10 PRINT " **♦#. ########■’ 

20 PR1NT U5ING "***♦». •#•#«•## "JATNt 1 ) *4 
30 PR INI USINU "**♦-*-#. 4###4### ,, ;-ATN 11 > »4 

*«♦*. 44 ### 44 # 

***♦3. 1 4 159265 
**♦-3. 14139263 


Uma vfrgu a 6 colocada à esouerda do ponto decimal na string dc formatação para 
fazer com que uma virgula seja impressa a cada très dígitos à esquerda do 
ponto decimal. 


IO PR I NT"*M *•- 

20 PRINT US IMG *' 4*44844444 , . 44'* ; 1090382. ÜU4 

30 PRINT M **44»444444, . 

40 PRINT USING , #*444444444, . #4**; 109O3B2.8B4 

4 M «44 4M444 , . 44 

1 ,090,387. 8B 

*♦*•4 H 4 4444 , .#4 

♦1,090, 382. BB 


Uma vírgula no final de uma string de formatação imprime uma vírgula no 
final do número. 

IO PRINT USING -4*. 44,"; 12.367 
12.37, 

AAAA Este é o especificadcr tíe tomiataçâo do expoente. Ele gera os espaços para 
E+xx. Você também pode especificar a posição dos pontos decimais. Dígitos 
significativos são alinhacos à esquerda e o expoente ã ajustado. 

PRINT USING”##. ♦* 4^^ H l 200.00 
2.00E+02 

PRINT USlNG"+#.#t x A ^-;200. 00 
♦2.O0E+02 

PRINT USING"#- 411 — -200. OO 

2.0OE»02- 
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Notas: 

Sc o n ií mero de dígitos especificados exceder a 24, Irá provocar um erro 
“ILLEGAL FUNCTION CALL”. 

LPRINT USING 

LPRINT USING é exatauiente o mesmo que PRINT USING, porém cic imprime 
na impressora e não no modo dc tela. 

PRINT* USING 

PRINT# USING é exatamente o mesmo que PRINT USING, porém ele imprime 
no dispositivo especificado pelo niímero após a marca #. Você deve executar um comando 
OPEN para abrir um canal para o dispositivo onde você deseja imprimir, antes de usar 
este comando. 

Sintaxe 

PRINT# < niime.ro dc arqui vo >, USING <expressáo-string> ;< lista de 
expressões >. 



CAPÍTULO 37 


TRATAMENTO DE INTERVALOS E 
INTERRUPÇÕES PELO BASIC 





INTRODUÇÃO 


O computador MSX é equipado com vários comandos dc tratamento de 
intervalos. Tratamento de intervalos (ou eventos) é dirigido por interrupções. Quer dizer 
que, enquanto o computador está executando um programo, ele tnmbdm está examinando 
se um evento em particular acontece. Se esse evento ocorrer, ele interrompe os 
procedimentos imediatamente saltando para uma suh-rotina dc usuário predeterminada. 

O MSX pode lidar com interrupções para os seguintes eventos; 


1. Definir intervalo de tempo 

2 . Pressionar teclas Ce funçãc 

3. Pressionar <CTRL> <STOP> 

4. Pressionar gatilho 

5. Colisáo fle "spntes” 

6. Erros 


ON INTERVAL GOSUB 
ON KbY GOSUB 
ON STOP GOSUB 
ON STRIG GOSUB 
ON SPRITE GCSUB 
ON ERROR GOSUB 


1. INTERRUPÇÃO DE INTERVALO DE TEMPO 

Comandos usados: 

ON INTERVAL = <tempo> GOSUB <Snha> 
INTERVAL ON/OFF/STCP 
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O MSX tem o seu próprio relógio interno, que começa a funcionar quando você 
liga o computador. O tempo pode ser visto com a função TIME TIME é incrementado a 
cada 1/60 avos dc segundo, a cada vez que o processador de exibição de vídeo fizer 
uma interrupção. 

Usando ON INTERVAL GOSUB, você pode especificar um intervalo de tempo 
para a interrupção ocorrer. Como TIME é incrementado a cada 1/60 avos de segundo, para 
definir o intervalo dc tempo para interromper a cada 1 segundo, você tem dc comparar o 
INTERVALO com 60, isto é, ON INTERVAL =60 GOSUB < linha >. 

ON INTERVAL = <tempo> GOSUB também define a sub-rotina para o qual o 
BASIC deve saltar sempre que a interrupção ocorrer. O computador irá saltar para essa 
sub-rotina assim que a interrupção ocorrer, não importa em que linha do programa esteja 
executando. 

O intervalo de interrupção é ativado por INTERVAL ON. Isso diz ao 
computador para iniciar a contagem do relógio. A menos que seja executado este comando 
ON INTERVAL GOSUB não irá funcionar. 

Uma vez ocorrida a interrupção de tempo, é executado automaticamente 
INTERVAL STOP. Isto evita que a interrupção de tempu ocorra durante a interrupção de 
tempo da atual sub-rotina. Entretanto, ele sc lembra se uma interrupção ocorreu durante a 
atual sub-rotina; neste caso, o computador irá executar imediatamente a sub-rotina 
outra vez, a menos que a atual sub-rotina desative completamente o interruptor de tempo 
executando INTERVAL O FF. 

Após deixar a sub-rotina dc intemipçáo, o computador irá executar INTERVAL 
ON automaticamente para ativar a interrupção, a iikiios que INTERVAL OFF seja 
executado dentro dessa sub-rotina. 

Você pode desativar o interruptor de tempo a qualquer momento que queira, 
usando INTERVAL OFF. 

O interruptor de tempo é desativado assim que o BASIC sair de um programa, 
isto é, não é possível interrupção de tempo em modo direto. Ele é também desativado 
cm qualquer sub-rotina dc desvio dc erro. 


Exemplo: 


Um programa curto para simular um exame digital com bips: 
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10 ON INTERUAL=60 GOSUB 60 
20 INTERUAL ON 
30 CLS 
40 S=0=H=0 
50 GOTO50 

55 REM sub rotina de intervalo 

60 IF S=60 THEN S=0 = M=h+i s LOCATE 10 F ií=PRINT "»in";hsB 
EEP 

70 S=S+1 

80 LOCATE 10,i0:?RINT "seg";S 
90 BEEP 
Í00 RETURN 


LINHA 

10 

DEFINE O TEMPO PARA 1 SEGUNDO NA 3UB-RCTINA EM 60 

LINHA 

20 

ATIVA O DESVIO INTERNO 

LINHA 

30 

LIMPA A TELA 

LINHA 

40 

INICIALIZA SEM 

LINHA 

50 

LOOPINÜ INFINITO PARA ESPERAR UMA INTERRUPÇÃO 

LINHA 

60 

SE 60 SEGUNDOS, ENTÀO 1 MINUTO 

LINHA 

70 

S+1 SEGUNDOS 

LINHA 

80 

IMPRIME SEGUNDOS 

LINHA 

9C 

TOCA O BI P 

LINHA 100 

RETORNA PARA ONDE ELE DEIXOU A ROTINA PHINCIHAL: NESIb 
CASO SEMPRE NA LINHA 50 


SEG 54 
MIN 3 


2. INTERRUPÇÃO DE TECLA DE FUNÇÃO 


Comandos usados: 

ON KEY OSUB <linha>, <Knha>, ... 

KEY (< número dc tcca>) ON/OFF/STCP 

É possível definir interrupções para as 10 teclas de função usando ON KEY 
GOSUB e KEY ( ) ON/OFF/STOP. 
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ON KEY GOSUB é seguido por uma lista de números, especificando a 
sub-rotina de interrupção para cada tecla de função. Se não existir uma sub-rotina 
correspondente para uma tecla de função em particular, então o número da linha pode 
ser omitido. 

O comando KEY (< número dc tccla>) ON ativa interrupções de teclas de 
funções para cada tecla de função. A menos que esse comando seja executado, o 
computador não irá procurar por uma interrupção para a tecla de função. Quando houver 
uma interrupção, o computador salta para a sub-rodna especificada em ON KEY GOSUB. 

Uma vez ocorrida a interrupção de tecla de função, é executada automatica- 
mente KEY (< número de tecla >) STOP. Isto evita que outra interrupção pela mesma tecla 
de função ocorra durante a atual sub-rotina de interrupção. Entretanto, ele lembra se essa 
tecla dc interrupção foi pressionada durante a atuai sub-rotina e o computador irá executar 
automaticamente a mesma sub-rotina outra vez, a menos que a atual sub-rotina desative 
totalmente a TECLA dc interrupção executando KEY (< número de tecla>) OFF. 

10 ON KEY GOSUB 100, í 20 , 140 , 160 r 180 , 200 

20 KEY ( 1 ) ON 

30 KEY < 2) ON 

40 KEY < 3 ) ON 

50 KEY ( 4 ) ON 

60 KEY (5) ON 

70 KEY (6) ON 

80 GOTO B0 

90 REH sub-rot ina 

100 P R INT"funcao i" 

110 RETURN 

120 PR INT"funcao 2" 

130 RETURN 

140 PRINT"funcao 3" 

150 RETURN 

160 PR INT"f uncao 4" 

170 RETURN 

180 PR INT"f uncao 5" 

190 RETURN 

200 PR INT"f uncao 6" 

210 RETURN 

LINHA 10 DEFINE AS SUB-ROTINAS PARA Fl, F2, F3, F4, Fõ E F6 
LINHA 20 ATIVA A TECLA DE FUNÇÃO Fl 
LINHA 30 ATIVA A TECLA DE FUNÇÃO F2 
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UNHA 40 

ATIVA A TECLA DE FUNÇÃO F3 

LINHA 50 

ATIVA A TECLA DE FUNÇÃO F4 

UNHA GO 

ATIVA A TECLA DE FUNÇÃO F5 

UNHA 70 

ATIVA A TECLA DE FUNÇÃO F6 

UNHA 80 

LOOPING INFINITO PARA ESPERAR POR UMA TECLA DE FUNÇÃO 

UNHA 100 

RCTINA PARA Fl 

UNHA 1 10 

RETORNA PARA O PONTO DE ONDE VEIO 

UNHA 120 

ROTINA PARA F2 

UNHA 130 

RETORNA PARA O PONTO DE ONDE VEIO 

UNHA 140 

ROTINA PARA F3 

LINHA 150 

RETORNA PARA O PONTO DE ONDE VEIO 

1 INHA 1G0 

ROTINA PARA F4 

LINHA 170 

RETORNA PARA O PONTO DE ONDE VEIO 

LINHA 180 

ROTINA PARA F5 

LINHA 190 

RETORNA PARA O PONTO DE ONDE VEIO 

LINHA 200 

ROTINA PARA F6 

LINHA 210 

RETORNA PARA O PONTO DE ONUE VEIO 

INTERRUPÇÃO 

< CTRL > <STOP> E 

DEFESA CONTRA BREAKS 


Comandos usados: 

ON STOP GOSUB <Hnha> 

STOP ON/OFF/STOP 

Lm programa cm BASIC é muito fácil de ser interrompido. Você sd precisa 
pressionar <CTRL> <STOP>. Isto pára o programa imcdiatamcntc c coloca vocô dc 
volta no modo direto. Entretanto, algumas vezes você vai achar que precisa de uma 
‘defesa de interrupção* * num programa para evitar que os usuários do programa vejam o 
seu conteüdo. Isto é feito desviando <CTRL> < STOP> com ON STOP GOSUB. 

O comando ON STOP GOSUB define a sub-rotina para a interrupção <CTRL> 
<STOP>. Dentro dessa sub-rotina, você pode colocar ou uma mensagem dizendo “Não 
pode ser interrompido” ou somente um RETURN, de modo que o programa possa, 
imcdiatamcntc, executar a partir de onde houve a interrupção com <CTRL> <STOP>. 
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STOP ON/OFF/STOP ativa/desativa o desvio <CTRL> <STOP>. 

Quando é executado STOP ON, o BASIC começa a verificar sc <CTRL> 
<STOP> foi pressionada a cada vez que executa um novo comando. Se for detectada 
<CTRL> <STOP>, então o BASIC é desviado para a sub-rotina especificada no 
comando ON STOP UOSUB executado antes no programa. 

Uma vez ocorrida unia interrupção, é executado um STOP STOP 
automaticamente. Isto pára a interrupção ocorrida durante a atual sub-rotina. Entretanto, 
ele lembra se <CIRL> <STOP> foi pressionada durante a atual sub-rotina c o 
computador irá imediatamente para a sub-rotina outra vez, se isso aconteceu, a menos que 
a atual sub rotina desative completamenle a interrupção <CTRL> <STOP>, executando 
STOP OFF. Após deixai a sub-rotina de interrupção, o computador irá executar 
automaticamente STOP ON para ativar a intemipção, a menos que seja executada STOP 
OFF dentro da sub-rotina. 

A línica maneira de interromper um programa a prova de intemipção é dar 
RESET no computador. De qualquer modo, vocc deve sc lembrar de gravar o seu 
programa a prova de interrupção antes de executá-lo. 


Exemplos: 

Eis uma rotina pronta a “prova de interrupção” para incluir cm seu programg. 


10 ON STOP GOSUB 10000 

20 STOP ON 


ESCREVA AQUI O SfcU PROGRAMA 


9999 REM Sub -rotina CTRL -STOP 

10000 RTURN 


LINHA 10 
LINHA 20 
LINHA 10000 


SUB-ROTINA STOP DEFINIDA PARA A LINHA 10000 
ATIVA O DETECTOR DE STOP 
RETORNA PARA O LOCAL ONDE A INTERRUPÇÃO 
FOI DETECTADA 
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Observe que o desvio ON STOP não evita que a tecla STOP pare o programa. 
Ela somente evita que você interrompa o programa cum <CTRL> < STOP>. 

Se você pressionar somente a tecla STOP, você irá ver que ela pára o seu 
programa e exibe o cursor. Sc você pressionar a tecla STOP pela segunda vez, o 
programa irá continuar. 

A interrupção <CTRL> <STOP> é desativada quando o programa não sendo 
executado e também durante as rotinas de desvio de erros. 


4. INTERRUPÇÃO DE DISPARO DE JOYSTICK (CONTROLADOR DE JOGOS) 


Comandos usados: 

ON STRIG GOSUB <urna lista de número de lnhas> 

STRIG (<n>) ON/OFF/STOP 

O ndmero de disparo, <n> , para cada disparo é conforme o mostrado; 

0 = barra oe espaços. 

1 = disparo 1 para o joystek 1. 

2 = disparo 2 para o joystick 2. 

3 = disparo 1 para o joystick 3. 

4 = disparo 2 para o joystick 4. 

Cada joystick compatível com o MSX tem dois botões de disparo. A barra de 
< espaço > também é considerada como um gatilho. 

ON STRIG GOSUB define as sub-rotinas de interrupção de disparo para esses 
gatilhos. Você pode definir sub-rotinas para todos os gatilhos de uma dnica vez listando os 
nilmeros de linhas para cada gatilho. 

Se não existir sub-rotino para esse gatilho em particular, então vocc pode 
omiti-lo e colocar somente uma vírgula. 

Por exemplo: 


ON STRIG GOSUB 1000, 200,,, 
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irá interromper para uma sub-rotina quando: 
a) gatilho 0 da barra de espaço 


ou 


b) gatilho 1 no joystick 1 

for pressionado, mas nada acontece se qualquer um dos outros gatilhos for pressionado. 

STRIG (<n>) ON ativa o desvio de gatilho para o gatilho especificado. Você 
somente pode especificar um gatilho por vez. 

Uma vez ocorrida a interrupção, 6 executado um STRIG (<n>) STOP 
automático, isto pára a interrupção que ocorreu durante a atual sub-rotina de gatilho. 
Entretanto, ele lembra se um disparador foi pressionado durante esta sub-rotina; e o 
computador vai imediatamente para a sub-rotina correspondente, para esse gatilho uma vez 
que tenha deixado a atual sub-rotina, a menos que a atual sub-rotina desative a interrupção 
para esse gatilho, executando STRIG (<n>) OFF. Após ter deixado a sub-rotina de 
gatilho, o computador irá automaticamente executar STRIG (<n>) ON para ativar a 
interrupção. 

A interrupção STRIG é desativada quando o programa não estiver sendo 
executado e também durante as rotinas de desvio de erros. 


Exemplos: 

Eis um programa bem pequeno que demonstra como o desvio de gatilho 
funciona testando cada gatilho de joystick. O programa está escrito dc modo que ambos 
os joysticks podem ser testados, bem como a barra de espaço. Se você pressionar a 
tecla <s>,o programa irá terminar. 

10 ON STRIG GOSUB i 00 „ í 20 r i 40 , i 60 , I R0 

20 STR IG < 0 ) ON 

30 STR IG < i ) ON 

40 STR IG < 2 ) ON 

50 STRIGO) ON 

60 STR IG < 4 ) ON 

■70 IF INKEYS="s" THEN END 

80 GOTO 70 
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90 REH ROTINA DOS DISPARADORES 

100 PRINT "barra de espaço pressionada"" 

110 RETURN 

120 PRINT "disparador i joystick 1" 

130 RETURN 

140 PRINT "disparador 1 joystick 2" 

150 RETURN 

160 PRINT '"disparador 2 joystick i" 

170 RETURN 

180 PRINT "disparador 2 joystick 2" 

190 RETURN 

LINHA 10 DEFINE TODAS AS SUB-ROTINAS DE DISPARO 

LINHA 20 ATIVA O GATILHO 0 

LINHA 30 ATIVA O GATILHO 1 

LINHA 40 ATIVA O GATILHO 2 

LINHA b0 ATIVA O GATILHO 3 

LINHA 60 ATIVA O GATILHO 4 

LINHA /0 SE <s> FOR PRESSIONADO TERMINA O PROGRAMA 
LINHA 80 LOOPING DE RETORNO À LINHA 70 
LINHA U0 ROTINAS DE DISPARO 


5. INTERRUPÇÃO DE COLISÃO DE ‘SPRITES" 


Veja o Capítulo de Gráficos Sprites Avançados para explicações detalhadas. 


6. DETECÇÃO DE ERROS 


Veja o Capítulo “Tratamento de Erros” para maiores detalhes. 





MENSAGENS DE ERRO - 

Quando o MSX-BASIC encontra um erro durante a execução de um programa 
ou comando, ele exibe uma mensagem de erro e pára a execução. Eis um resumo das 
mensagens de erro: 

Código Mensagem Descrição 

1 NEXT without FOR íou NEXT sem FOR, no HOT-BIT) 

Uma variável em um comando NEXT não coincide com 
uma variável cm um comando FOR anterior; ou um 
comando NEXT foi encontrado sem um comando FOR 
anterior. 

2 Smtax error (cu Erro de sintaxe, no HOT-BIT) 

Erro de grafia no comando ou pontuaçSo errada. 

3 Retum without GOSUB (ou "RETURN” sem "GOSUB" no HOT-BIT) 

Um comande RETURN foi encontrado sem um comando 
GOSUB coincidente. 

4 Cut of DATA (ou sem 'DATA ”, no HO^-BIT) 

Um ccmanco READ fei executado quando todos os dados 
em linhas DATA já ‘oram usados: ou não existem 
comandos DATA oara o comando READ ler. 


A princípio as mensagens de erros referem-se ao EXPERT. As mensagens do HOT-BIT vêm entre parênteses. 
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5 lllegal funcbon cal (ou Função ilegal, no HOT-BIT) 

Um parâmetro ilegal 'oi passado para uma função 
matemática ou de string. 

6 Overfiow 

C número é muito grande para o tipo de variável, funçSo 
ou comando a ser tratado. 

7 Out u í memory (ou Falta memória, no HOT-BIT) 

Salda da memória devido a um programa muito longo, com 
excesso de FOR, excesso ce GOSUB, muitas funções 
ou variáveis. 

8 Undef ned line number (ou n ç linha inexistente, no HOT-BIT) 

Foi referido um número de linha não existente em um 
corando GOTO, GOSUB, IFYTHEN/ELSE ou em um 
comando D ELE TE. 

9 Subscript out of range (ou Índice fora do limite, no HOT-BIT) 

Um subscrito de um c emento de uma matriz está fora da 
faixa esoeciíicada no comando DIM, ou o número do 
subscrito está errado. 

10 Redimensioned array (ou "DIM" redefinido, no HCT-BIT) 

D mensionando uma matriz jô existente usando DIM. 

1 1 Division by zero (ou "DIVISÃO" po' zero, no HCT-BIT) 

Foi encontrada uma divisão por zero em uma expressão. 

1 ? lllegal direct (ou "Direto iegal", no HOT-BIT) 

Um comando que não é permitido no modo direto. 

13 Type mysrnatch (ou “Tipo desigual", no HOT-BIT) 

Uma variável string foi atribuída a um número ou vice- 
versa. 

1 4 Out of string space (ou "Falta área 'string’ ", no HOT-BIT) 

Saiu fora da área de trabaho de strings na RAM do 
sistema. 

1 5 String too ong (ou “ Slrrg' longa", no HOT-BIT) 

Foi tentada a criação de uma string com mais de 255 
caracteres. 

1 6 String formula too complex (ou ‘‘String" complexa, no HOT-BIT) 

Uma expressão de string ó muito complexa para o 
computado- Iratar. 

17 Can’t continue (ou M Nãc cuntínuoH, no HOT-BIT) 

Fo tentado continuar um programa que terminou com um 
erro, ou que já tenha sido editado ou terminado. 
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1 8 Undefined user function (ou “Função não def nida", no HOT -BIT) 

Foi chamada uma função TN sem primeiro ter sido 
definida com um comando DEF FN. 

1 9 Device l/O error jou, “Erro/PerifArieo”, no HOT-BIT) 

Um erro de entrada/saída em um cassete, impressora 
etc. É um erro fatal sem possibilidade de recuperação. 

20 Verify error (ou "Erro/Verií”. no HOT-BIT) 

Ao se usar o comando CLOAD?, a verificação de uma fita 
cassete lalhou. 

21 Nc RESUME (ou “RESUME", no HOT-BIT) 

Uma rotina de desvio de erro não tem o comando 
RESUME que é esperado pelo computador. 

22 RESUME withOut error (ou “ 'RESUME' sem ‘ERROR’ ", no HOT-RIT) 

Um comando RESUME não esperado foi encontrado fora 
de uma rotina de desvio oe erro. 

23 Unprintable error (ou “Erro indefinido", no HOT-BIT) 

O erro foi encontrado mas não há mensagem. 

24 Missing onersnd |ou “Falta operando", no HOT-BIT) 

Uma expressão continha um operador sem operando 
segu indo-o. 

25 Linc txjfler ovcrflow (ou “Linha Muito Longa", no HOT-BIT) 

Uma linha digitada tem caracteres sern excesso. 

26-49 Unprintable error (ou “Erros indefinioos”, no HOT-BIT) 

Reservados para futura expansão. 

50 Fielc o verflow (ou "Campo maior”, no I IOT -BI 1 ) 

Um comando FIELD tentou alocar mais bytes que o 
especificado para o tamanho dü registro de um arquivo 
aleató r o em um comanco OPEN; ou o final do bufler 
FIELD lo encontrado enquanto estava fazendo operação 
seqüenclal de l/O (PRINT#, INPUT#) para um arquivo 
aleatôno. 

51 Internai error (ou "Erro interno", no HOT-BIT) 

Mau funcionamento da mácuina. 

52 Bad filo number (ou “Número do arquivo", no HOT-BIT) 

Um cornando se referiu a um arquivo não existente ou fora 
ca faixa MAXFILES. 

53 File not found (ou "Arquivo náo existe”, no HOT-DIT) 

Um comando LOAD ou OPEN se referu a um arquivo não 
existente. 
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54 File already open (ou “Arcuivo aberto", no HOT-BIT) 

Foi tenlaco abnr um arquivo já aoerto. 

55 Input past end (ou Tmdo arquivo”, no HOT-RIT) 

Um comando INPUT loi executado após todos os dados 
do arquivo á lerem sido Idos. Use COF para evitar que 
isso aconteça. 

56 Bad file name (ou "Nome arquivo”, no HOT-BIT) 

Foi dado Lm norc dc arquivo ilegal num comando LOAD, 
SAVE ou oulro comando de l/C. 

57 Dircct statement in fie (ou "Comando direto /Arquivo", no HOT-BIT) 

Um comanco foi encontrado durante a carqa de um 
programa. Isso ocorre quando usamos CLOAD para 
carregar um programa que foi gravado no formato binário. 

58 Sequential PO only (ou "Arquivo sequencial", no HOT-BIT) 

Foi emitido um comando de acesso aleatório para um 
arquivo sequencial. 

59 Fie not OPEN (ou "Falta ‘OPEN* ", no HOT-BIT) 

O arquivo referido ainda não está aberto. 

60-255 Unpnntable error (ou "Erros indefinidos”. no HOT-BIT) 

Sem côdgos de erros. Estes podem ser definidos pelo 
usuário. 


TRATAMENTO DE ERROS 


O MSX-BASIC contém muitas funções e comandos para ajudar a depurar o seu 
programa. F prática normal incorporar uma rotina de tratamento de erros ou de desvio 
dentro do seu próprio programa enquanto ele ainda está sendo desenvolvido. Isso irá 
ajudá-lo a detectar qualquer erro que vocè tiver cometido durante uma execução dc teste 
do seu programa. 

Antes de aprendermos como escrever tais rotinas de desvio de erros, vamos dar 
uma olhada em cada uma das palavras chaves do BASTC usadas no tratamento de erros. 

ERL, nos dá a linha com erro. 

ERL é uma variável reservada que contém o número da linha que contém o erro 
encontrado na execução do programa. 
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ERR indica o número do código do erro. 

ERR contém o número de código de erro após o computador ter detectado um 
erro no programa. Ele tem uni valor entre 1 e 255. Os significados dos erros associados ao 
número contido em ERR são listados da mesma forma que anteriormente. 


ERROR 


Existem duas maneiras básicas de se usar o comando ERROR. 

1. Para simular a ocorrência de um erro. Um comando ERROR com um 
argumento inteiro levará o computador a pensar que tem um erro e ele 
terminará o programa e imprimirá a mensagem de erro com o número da 
linha. 

2. Para criar erros definidos pelo usuário. Um comando ERROR junto com o 
uso de uma função de desvio de erro ON ERROR GOTO irá permitir que 
você cric seus próprios erros customizados (adiante daremos mais infor- 
mações) 


ON ERROR GOTO < linha -> 

ON ERROR GOTO permite desvio de erros e especifica para que linha o 
computador deve ir quando é detectado o erro. Uma vez dito ao computador para desviar 
nos erros, ele irá saltar para a linha especificada, para executar a sub-rotina de tratamento 
de erros especificada, sc acontecer um erro durante a execução do programa ou em modo 
direto, isto é, fora do programa. 


RESUME 


RESUME significa reiniciar uma operação no BASIC após um procedimento de 
tratamento de erros ter sido executado usando o comando de desvio de erro ON ERROR 
GOTO. Após o erro ter sido tratado, RESUME diz ao computador para continuar a 
execução de acordo com a smtaxe abaixo: 

RESUME ou RESUME 0 

Rem ria a execução a partir do comando que provocou o erro. 
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RESUME NEXT 

Reinicia a execução a partir co comando .seguinte àquele que causoL o erro. 
RESUME < linha > 

Reinicia a execução a partir co número de I nha especificado. 


ROTINAS DE TRATAMENTO DE ERROS 


Para incorporar uma rotina de trataucnto de erros em seu programa você deve 
fazer o seguinte: 

1. Colocar o comando ON ERROR COSIÍB no início do programa para 
permitir o desvio de erros daí para frente. Após esse comando ter sido 
executado, o computador irá, quando houver um erro, desviar para a rotina 
dc tratamento dc erros quer vocè esteja no modo direto ou indireto. 

2. Colocar uma sub-rotina de tratamento de erros no final do programa. 

Um programa simples com uma rotina dc tratamento dc erros sc parece com 

este: 


10 ON ERROR 150 TO 100 
20 PPINT 10 
30 PRONT 20 
40 PRINT 30 
50 ENO 

99 REM rotina de tratamento de erros 

100 ON ERROR G0 T 0 0 

UNHA 10 ATIVA O CESVIC CE FFROS F DFFINF A SUB-ROTINA DE ERRO 
PARA A LINHA 100 
ERRO AQUI 

TERMINA O PROGRAMA 

ON ERROR GOTO FAZ COM QUE O BASIC PARE E IMPRIMA O 
FRRO QUE CAUSOU O DESVIO 


LINHA 30 
LINHA 30 
LINHA 99 
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Quando o programa acima for executado, aparecerá o seguinte: 


RUN 

10 

Syntax error in 30 


O erro da linha 30 toi detectado e o programa desviado para a lmha 100. ON 
ERROR GOTO 0 tem o efeito de exibir o erro que causou o desvio e parar o programa. 
Ela também desativa o desvio de erro. 

Até agora, tudo isso pode ser feito sem se precisar ter o desvio de erro. Se não 
existir um comando ON ERROR GOSUB, o computador ainda irá detectar o erro da linha 
30 e dar a mensagem “Sintax error in 30" (erro de sintaxe em 30). Entretanto, a rotina de 
desvio de erro tem outros dispositivos. 

Por exemplo, a sub-rotina de tratamento de erros pode conter um procedimento 
dc recuperação de erro, para colocar vocé de volta no programa. Para fazer isso, vocé 
precisa saber que tipo de erros quer recuperar para tratá-los, e como o computador deve 
reiniciar a operação. 

Neste exemplo, existem uns poucos itens dc dados cm comandos DATA na linha 
60. isto provoca um erro de dados (código 4) quando o computador estiver no seu quarto 
loop. A rotina de tratamento de erros é equipada com um procedimento de recuperação de 
erro na forma da linha 100. Essa linha descobre se o erro foi realmente um erro de dados 
verificando o código de erro de ERR, e então executa um comando RESTORE de modo 
que os dados possam ser usados outra vez. Ela reinicia a operação a partir da linha onde o 
eno foi detectado. 


10 

ON ERROR GOTO 

100 

20 

FOR 1=1 TO 5 


30 

READ AS 


40 

PRINT AS 


50 

NEXT I 


60 

DATA u«,dois,tres 

70 

END 


90 

R EM ROTINA DE 

ERROS 


100 IF ERR=4 THEN RESTORE « PR I NT "sem dados" 5 RESUME 
110 ON ERROR GOTO 0 
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LINHA 10 PERMITE O DESVIO DE ERROS E DEFINE A SUB-ROTINA 
DE ERRO PARA A LINHA 100 
LINHA 20 EXECUTA O LCO? CINCO VEZES 

LINIIA 30 Lf OS DADOS 

LINHA 40 IMPRIME A$ 

LINHA 50 LOOP SEGUINTE 

LINHA 60 SOMENTE TRÊS ITENS DE DADOS AQUI 

LINHA 70 FIM 

LINI IA 100 SE EHH ESTIVER FORA DOS DADOS (CÓDIGO 4) ENTÃO 
RESTAURE E REINICIE A OPERAÇÃO A PARTIR DE ONDE 
ENCONTROU O ERRO 

LINHA 1 10 IMPRIMA A MENSAGEM DE ERRO SE QUALQUER OUTRO 
ERRO FOR ENCONTRADO 

run 

um 

dote 

tres 

sem dados 

um 

dote 


Com alguns erros vo cc náo vai querer que o computador reinicie a operação a 
partir da mesma linha. Erros como euo de sintaxe não podem realmente ser remediados 
dentro de um programa, tendo dc ser editado. Entretanto, se você quiser que o computador 
salte a linha com o erro, forneça a você uma mensagem, e prossiga então com o programa 
até o final, use o comando RESUME NEXT que reinicia a operação a partir da linha 
seguinte Aquela em que o erro foi detectado. 


10 O N ERROR GOTO Í00 
20 PRINT i0 
30 PRONT 20 
40 PRINT 30 
50 END 

9? REM ROTINA DE TRATAMENTO DE ERROS 

i00 PR INT"Er ro d* cori i go=";ERR ?"na linha "?ERL 

110 RESUME NEXT 
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LINHA 10 ATIVA O DESVIO DE ERROS E DEFINE A SUB-ROTINA DE 
ERRO PARA A LINHA 100 
LINHA 30 ERRO AQUI 

LINHA 50 TERMINA O PROGRAMA 

LINHA 100 EXIBE O CÓDIGO DE ERRO E A LINHA DE ERRO 

LINHA 110 ENTÃO REINICIA A OPERAÇAO A PARTIR DA PRÓXIMA LINHA 

RUN 

10 

ERRO DE CÓDIGO = 2 NA LINHA 30 
30 

Observe que você pode especificar para que linha ir pelo comando RESl IMF, de modo 
que, no exemplo anterior, RESUME 40 tem o mesmo efeito. 

F. possível exibir a linha que contém o erro usando uma rotina dc tratamento de 
erros. Será muito mais fácil corrigir o erro se a linha que contém o erro for exibida 
exatamente após o erro ter sido detectado. Para fazer isso você deve terminar a rotina de 
recuperação de erros com o comando LIST. (list ponto). LIST. tem o efeito de listar 
d última linha referida pelo computador. 

Í0 ON ERROR GOTO 100 
20 PRINT 10 
30 PRONT 20 
40 PRINT 30 
50 END 

9V REh ROTINA DE TRATAMENTO DE ERROS 

100 PRINT"Erro de cod i go=" ;ERR ;"na linha ";ERL 

110 L I ST . 

LINHA 10 ATIVA O DESVIO DE ERRO E DEFINE A SUB-ROTINA DE 
ERROS PARA A LINHA 100 
LINHA 30 ERRO AQUI 

LINHA 50 TERMINA O PROGRAMA 

L INH A 1 0O EXIBE O CÓDIGO DO ERRO E A LINHA DO ERRO 
LINHA 110 E ENTÃO LISTA A LINHA COM ERRO 


10 

ERRO DE CÓDIGO =2 NA LINHA 30 
30 PRONT 20 
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Agora você pode corrigir a liitha 30 para: 
30 PRINT20 


COMO CRIAR OS SEUS PROPRIOS ERROS 
(ERROS CUSTOMIZADOS) 


Um comando ERROR junto com o uso do comando de desvio de erro ON 
FR ROR GOTO irá permitir que você crie os seus próprios erros customizados. 

Lxistem cerca de 36 erros, entre os códigos de erro 1 e 60, na presente versão 
do MSX-BASIC. Nümeros de códigos entre 61 e 255 podem ser usados pelo 
programador. 

Para programar o seu próprio erro, primeiro você deve colocar o computador no 
modo dc desvio de erro executando o comando ON ERROR GOTO <linha> no início do 
programa. Então, se, no meio do programa, uma condição aparecer de modo que você 
queira chamar a rotina dc desvio dc erro, vocc pode fazer isso com: 

IF < condição > THEN ERROR < código de erro > 

ON ERROR GOTO será ativado e o computador irá iniciar iinediatamente a 
sub-rotina de desvio de erro. Dentro da sub rotina você deve ter uma linha que diga: 


IF Fnn = <côcigo de erro> THEN PRINT “Mensagem de erro" 


No seguinte exemplo todos os comandos digitados com MATE scrao tratados 
como um novo erro (n 9 255), e são tratados na rotina de desvio de erro usando a 
variável ERR. 

10 ON ERROR GOTO 100 

20 INPUT"MEU MESTRE,QUAL O SEU DESEJO";A* 

30 IF INSTR < A% , "MATE" ) THEN ERROR 255 
40 PRINT"OK" 

50 END 

100 IF ERR=255 THEN PRINT "VOCE NAO PODF MATAR NADA NE 
STA AVENTURA": RESUME 20 
110 END 
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UNHA 10 ATIVA O DESVIO DE ERRO 

UNHA 20 ENTRADA 

UNHA 30 VERIFICA PALAVRA INVÁLIDA 

LINHA 100 MENSAGEM DE ERRO REINICIA NA UNHA 20 

LINHA 1 10 TERMINA SE O ERRO NÃO FOR 255 

RUN 

MEU MESTRE. QUAL 0 SEU DESEJO? MATE-O 
VOCE NAO PODE MATAR NADA NESTA AVENTURA 
MEU MESTRE , QUAL 0 SEU DESEJO? VA PARA 0 LESTE 
0I< 

L prática normal no MSX-BASIC, quando você está definindo os seus próprios 
códigos dc erros, começar a partir do 255 para baixo, dc modo que você possa evitar 
conflitos com qualquer futura expansão nas mensagens de erro feitas pelos fabricantes de 
computadores MSX. 


NOTAS SOBRE O TRATAMENTO DE ERROS 

O comando ERROR pode também ser usado para simular a ocorrência de um 
erro. Por exemplo: 

ERROR 2 

resultará em: 

Sintax error 

Se o código de erro não tiver mensagem de erro predefinida, então quando o 
computador encontra esse erro no programa, ele irá imprimir "Unprintablc Error”. 

Nenhum desvio de erro é executado durante uma rotina de desvio de erros. Se 
existir um erro dentro da rotina de desvio de erros, ele irá dar uma mensagem de erro e 
parar o programa. 
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Nem todos os erros podem ser tratados por rotinas de desvio de erros. Dessa 
forma é recomendado terminar uma rotina de desvio de erros com ON ERROR 
GOTO 0 que irá parar a execução do programa BASIC e exibir a mensagem de erro. 

ON ERROR desativa todos os desvios de tratamento de eventos como ON 
INTLRVAL e ON STRIG. 
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GRAVANDO NO E CARREGANDO DO CASSETE 


INTRODUÇÃO 

Existem diversos modos de se gravar e carregar programas e dados em um 
cassete. Este capítulo trata dos usos mais sofisticados do cassete. 


COMANDOS E FUNÇÕES ASSOCIADAS COM 
A GRAVAÇÃO E CARGA DO CASSETE 

Eis uma lista dos comandos e funções que são associados à exibição no modo de 

teia. 

Gravar e carregar programas BASIC (veja a introdução ao MSX-BASIC para 

detalhes): 

CLOAD Carrega um programa BASIC do cassete. 

CSAVE Grava im programa BASIC do cassete. 

CLOAD? Verifica um programa BASIC em fila contra um na memória do 

computador. 

MOTOR Ativa/desativa o motor do cassete. 

* Taxa da velocidade de gravação dos dados na fila k-7. 

IB 
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Gravar, carregar e "juntar” usando o formato ASCII 

SAVE Grava um programa BASIC para um dispositivo especificado, em um 

arquivo ASCII. 

LOAD Carrega um programa BASIC gravadc em um arquivo ASCII do 

dispositivo especificado. 

MERGE Junta (ou cola) um programa BASIC gravado em um arquivo ASCII com 
uru programa BASIC na memória do computador. 

Gravar e carregar uma seção na memória do computador como um programa em 
linguagem de máquina ou dados: 

BSAVE Grava una seção de memória. 

BLOAD Carrega uma secão oe memória. 

Definir a taxa baud* para gravar no cassete 

SCREEN 

CSAVb 


A TAXA BAUD PARA GRAVAR NO CASSETE 

A taxa baud é a taxa de velocidade na qual os dados são transmitidos para o 
cassete. O MSX usa o formato FSK que fornece a você a opção de duas taxas baud: 1.200 
baud e 2.400 baud. Isso pode ser definido ou pelo comando SCREEN, ou pelo comando 
CSAVE. A taxa baud padrão é 1.200. Suas sintaxes são as seguintes: 

SCREEN, „1 1200 baud 

SCPEEN, n 2 2400 baud 

CSAVE " < nome >" 1 200 baud 

CSAVE “<nome>",1 1200 baud 

CSAVE - < nomc> ",2 240C baud 

A taxa baud de gravação pode ser ou 1.200 baud ou 2.400 baud, mas CLOAD, 
LOAD e BLOAD verificarão automaticamente em que taxa está gravado e carregar de 
acordo. 
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GRAVANDO E CARREGANDO NO FORMATO ASCII 


Quando um programa normal cm BASIC é gravado em uma fita cassete, isto 
ocorre em forma de símbolos, para que o programa possa ser gravado em um formato 
eficiente. Entretanto, sc vocc precisar gravar o seu programa em código ASCII, deve usar 
o comando SAVE. Para carregar um programa gravado em código ASCII você usa o 
comando LOAD. Tanto para o SAVE como para o LOAD, vocc deve especificar o 
Sispositivo no qual você está gravando ou do qual você está carregando na forma de um 
<descrilor de dispositivo> . Entretanto, somente o cassete é suportado na atual versão do 
MSX-BASIC, dc modo que o descritor de dispositivo deve sempre ser “CAS:’\ Aqui está 
uma lista da sintaxe: 

SAVE M <descntor de dispositivo> <nomc do programa^" 

Grava um programa BASIC em um arquivo ASCII. 

LCJAU *’ <nome do d spositivo> '* 

Carrega o primeiro arquivo BASIC encontrado, giavado no formato ASCII. 

I OAD “ <nnmfi dn d spositivo> <nome do arquivo> " 

Carrega jm arquivo BASIC com o nome especificado. 

LOAD “ cnome do dspositivo> <none do arquivo>",R 

Carrega um arcuivo BASIC com o nome especificado o então o executa. 

Observe que a opção R no LOAD irá executar automaticamente o programa 
BASIC recém-carregado. 

O uso principal da gravação no código ASCII é o de o piograma poder ser 
intercalado com outro, que é o que irá acontecer com o próximo. 


INTERCALANDO DOIS PROGRAMAS EM BASIC 


Vamos dizer que vocc tem dois programas em BASIC, programa 1 e programa 
2, e você quer intercalar o programa 2 com o programa 1 , de forma que o programa 2 
venha logo após o programa 1 quando ele for intercalado. Vamos dizer que ambos foram 
inicialmente gravados em fita cassete. 
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PR0G1 

10 REM PROGRAMAI 

?0 PRINT "DEM VINDO" 

30 PRINT “AO” 

40 PRINT -MSX" 

PROG2 


10 Kfcn prugroma 2 
20 FOR 1=32 TO 38 
30 PRINT CHRS < I ) 
40 NEXT I 


Primeiro, carregue o programa 2 e renumere-o de modo que todos os números de 
linha sejam maiores que os do programa 1. 


CLOAD PROG 2“ 
RENUM 50 
LIST 


50 RFM PROGRAMA 2 
A0 FOR 1-32 TO 50 
70 PRINT CHR* ( I ) 
00 NCXT I 


Então grave-o em um arquivo ASCII usando SAVE: 

SAVE ”CAS:PROG2" 

Carregue o programa 1 do cassete: 

CLOAD “PROG1" 

Apds você ter carregado o programa 1 do cassete, rebobine a fita até o ponto 
onde PROG2 está gravado. Digite: 

MERGE “CAS:PROG2" 


e ligue o cassete. O computador irá incluir o programa 2 no final do programa 1. 
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10 REI* PROGRAMA 1 
20 PRINT "BEM-VINDO" 

30 PRINT "AO" 

40 PRINT "MSV" 

50 REh PROGRAMA 2 
60 FOR 1=32 TO 58 
70 PRINT CHRKI) 

Ü0 NEXTI 

Favor observar o seguinte quando estiver intercalando dois programas: 

1. Se um número de linha ocorrer tanto no programa inicial como no programa 
2, o programa resultante irá conter a linha do programa 2. 

2. MFRGF precisa do nome de dispositivo em sua sintaxe. 

MERGE “enume do dispositivo> <nome do arquivo > M cnome do 
dispositivo > =CAS: para cassete 

3. Se o nome do arquivo for omitido em um comando MERGE, então o 
primeiro arquivo ASCII encontrado na fita será intercalado. 


GRAVANDO E CARREGANDO UMA SEÇÀO 
DA MEMÓRIA DO COMPUTADOR 


Para gravar uma seção da memória do computador, de um endereço especificado 
de memória para o cassete, use o comando BSAVE. Você deve especificar o endereço 
inicial e final da memória que você quer gravar. Este comando é usado para gravar 
programas em linguagem de máquina e dados na forma de bytes. 

Se você está gravando um programa em linguagem de máquina, você tem a 
opção de especificar o endereço de execução. Quando você está carregando o programa 
em linguagem de máquina com BLOAD, se o BLOAD especificar para auto-executar o 
programa em código de máquina, ele irá executar o programa no endereço especificado em 
BSAVE. 

Qualquer coisa gravada com BSAVE deve ser carregada com BLOAD 

Sc o endereço de execução for omitido quando o código for gravado, então o 
computador assume que o endereço de execução é o endereço inicial quando o programa 
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for carregado com a opção R de auto-execução do programa. Eis uma lista da 
sintaxe: 


BSAVE "cnorne do dispositivo > : <nome>", < endereço inidaO, < endereço 'inal> 
BSAVE "<nome rio dispositivo : <nome>", Ce^dereço inicial >, <endereço final >, 
<endereço de execução > 

BLOAD "< nome do dispositivo > :<nome>",R 

<nome> e R são opcionais. 

A opção R executa automaticamente o programa em código de máquina 
recém-carrcgado. R significa RUN (executar). 

BLOAD “<nome do dispositivo > : <nome> ,, I enumero constante> 


Quando o deslocamento (off-set) for especificado o arquivo será inserido na memória na 
posição especificada por < número constante v. 

Os endereços podem scr dados em números hexadecimais, ou seja: 


BSAVE *CAS:PRCG^&HF300,&HF380,&HF30A. 




CAPÍTULO 40 



CARACTERÍSTICAS DE CADA MODO DE TELA 

O MSX tem um dos mais versáteis chips gráficos, o TMS 9929 A. desenvolvido 
pela Texas Instruments. Inc. dos Estados Unidos. É um dos mais compreensivos chips 
gráficos disponíveis, e fomccc a você uma grande variedade de facilidades, como gráficos 
de alta resolução em 16 cores e animação de sprites. Ele pode até gerenciar sua própria 
RAM de 16K, qne significa que o processador central náo precisa fornecer memória para 
o gráfico no modo de tela. 

O MSX-BASIC foi escrito especialmente com essas fortes capacidades gráficas 
e facilidades de programação para iniciantes. É fácil dc scr usado uma vez que vocè já o 
tenha experimentado, c ele produzir algumas figuras espetaculares se você tentar com 
afinco. 

Vamos iniciar explicando em primeiro lugar os modos de exibição disponíveis 

no MSX 


2/9 


220 


MSX - Guia do Programador 


Modo de tela 


Modo 

Texto/Gráfico 

Resolução 

Cores 

Entrada 

Gráficos 

Sprites 

0 

40x24 modo 

40x24 car 

2 em 16 

sim 

não 

não 


texto 






1 

32x24 modo 

32x24 car 

2 em 16 

sim 

não 

sim 

2 

gráf. aJta 

256x192 

16 

não 

sim 

sim 


resolução 

car ac. 





3 

Multicores 

64x68 blocos 

16 

não 

sim 

sim 


Notas: 

ENTRADA: uso ou não do comando INPUT no modo rie tela dado. Você não pode fazer 
entrada enquanto estiver em um modo gráfico. 

* 

GRÁFICOS; uso de comandos gráficos, por exemplo DRAW, no modo dc tela dado. 
Geralmente vocc não pode usar comandos gráficos em modos de texto (0 e 1 ). 


Comandos e funções associados a modos dc tela 

Eis uma lista de comandos e funções associados ò exibição no modo dc tela. Mais detalhes 
são dados na seção de referencia do BASIC. 


Comandos associados a TODOS os modos dc tela 

SCREEN Define o rrodo de tela. 

CLS Limpa a tola. 

COLOn Define as ctres de texto, de fundo e das margens. 


Comandos e funções associados a MODOS DE TEXTO SOMENTE 

WIDTH Define a largura do modo de tela Ce :cxto. 

LOCATE Define a posição tío cursor no modo de tela de texto. 
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TAB De ine a posição horizontal do curso r na linha atual. 

CSRLIN Retoma a posição verlical atual do cursor 
POS(O) Retoma a posição horizontal atLal do cursor. 


Comandos c funções associados a MODOS GRÁFICOS SOMENTE 


CIRCLE 

DRAW 

UNÍ 

PAINT 

PSET 

PRESET 

POINT 


Desenha urr c'rculo. 

Desenha de acordo com a macrolingu=.gem macro. 
Desenha linhas, quadrados c retíngulcs. 

Pinta com a cor de textc atual. 

Desenha im ponto. 

Elimina un ponto. 

P eterna a cor do ponto referido. 


Comandos associados ao PROCESSADOR DE EXIBIÇÃO DO VÍDEO (VDP) 

VPOKE Executa uma sentença POKr ra RAM de vídeo. 

VPtbK Executa uma sentonça PE E< na RAM de vfceo. 

VDP Retorna valores do registrador VDP. 

BASt Retorna o endereço base cas tabe as das RAM de vídeo. 


MODO 0: MODO DE TEXTO 40 * 24 


— 'argura máxima de 40 caracleres 

( 0 , 0 ) 


;LARGJRA-1.23) 


largura fixada por WIDTH 


À 


24 caracte-es 


t 


O MODO 0 dá a você 40 caracteres por linha, que é o mímero máximo de 
caracteres que você pode ter cm uma linha em computador MSX. Nesse modo você pode 
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escrever e editar o seu programa. Você descobrirá que a exibição de um programa neste 
modo é mais fácil de se ler. 

Entretanto, o MODO 0 tem algumas desvantagens. Por exemplo, os caracteres 
são exibidos no formato comprimido, isto é, 6 x 8 em vez de 8 x 8 e. dessa forma, 
alguns caracteres gráficos irão aparecer coitados. Os dois pontos mais à direita em cada 
caractere não são exibidos! Entretanto, isto não afeta caracteres alfanuméricos. 

A largura padrão do modo de tela no MODO 0 é dc 37 caracteres. Você pode 
aumentar a largura da exibição para 40 caracteres, usando o comando WIDTH. As 
coordenadas do canto superior esquerdo são (0,U), enquanto que o cauto inferior direito é 
(WIDTH 1,23), ou quando inicializado é (38,23). 

Você pode posicionar o cursor de texto usando TAR c ÍTDCATE. Para descobrir 
onde está o cursor, são usadas as funções POSfO) e CSRLIN. 

No MODO 0, você não pode usar SPRITES e também sri pode usar duas das 16 
cores, apesar do fato da combinação de duas cores ser de sua livre escolha. As cores 
padrões são as mesmas do MODO 1 : texto cm branco c fundo azul. Observe que o MODO 
0 não tem qualquer margem: ela simplesmente desaparece da exibição, de modo que 
definir cores no MODO 0 é complctamcntc inútil. Observe que as cores da exibição irão 
mudar imediatamente após a execução do comando COLOR. 

Apesar de ser modo gráfico, você está livre para usar comandos INPl JT c a lista 
das teclas dc funções é exibida na linha 23, a menos que seja desativada por KEY OFF. 

l odos os comandos gráficos e funções deste modo serão tratados como u II legal 
function cal!**, de modo que vamos examiná-las. 


MODO 1: MODO TEXTO 32 x 24 


— Iarqu r a máxima de 32 caracteres ► 

m 


(LARGURA - 1,23) 


• 24 caracteres 


largura dada por WIDTH 
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O MODO 1 tem uma resolução de 32 x 24 caracteres, mas não é gráfico. Neste 
modo você pode escrever e ditar programas. Hlc pode exibir 8x8 caracteres sem qualquer 
corte (como no caso do MODO 0). 

Você pode aumentar a largura de exibição para 32 caracteres usando o comando 
WIDTH. O motivo para a largura padrão ser menor que 32 é que algumas TVs c monitores 
não podem exibir o modo dc tela inteiro. 

A coordenada do canto superior esquerdo é (0,0), enquanto que a do canto 
inferior direito d (WIDTH— 1,23). 

Você pode posicionar o cursor dc texto usando FAB e LOCATE. Para descobrir 
onde está o cursor, use as funções POS(O) c CSRL1N. 

Você pode usar somente 2 das 16 cores, apesar delas serem dc sua inteira 
escolha. Observe que as cores da exibição mudam imcdiatamcntc apris a execução do 
comando COLOR. 

Apesar dc ser modo gráfico, você está livre para usar o comando INPUT, e a 
lista das teclas dc função é exibida na linha 23 a menos que seja desativada por 
KEY OFF. 

Todos os comandos gráficos e funções neste modo, exceto aquelas envolvidas 
com sprites, serão tratadas como chamadas ilegais dc função. 


MODO 2: MODO GRÁFICO DE ALTA RESOLUÇÃO DE 256 x 192: 


• 256 PONTOS "* 

(ÕÕ) (2bò,Q) 


(0,191) (255,191) 


192 PONTCS 


T 


O MODO 2 é o modo gráfico mais largamentc usado, pois fornece ao usuário 
um modo gráfico de tela de alta resolução com 16 cores. Neste modo você pode usar 
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sprites e a macro linguagem gráfica através do comando DRAW. Este é o modo usado na 
maioria dos programas de jogos. 

Sua resolução horizontal é de 256 pontos, enquanto que a resolução vertical é de 
192 pontos. Entretanto, a resolução de cores é um tanto diferente: é de 32 x 192. Isto 
significa que você somente pode selecionar duas cores por bloco horizontal de 8 x 1 
ponto. Você pode selecionar a cor de fundo e a de texto para cada bloco de 8 pontos, mas 
sc desenhar um ponto com uma terceira cor, os pontos desenhados na cor anterior dentro 
desse bloco irão alterar- se para a nova cor de fundo automaticamente. Devido a isso, você 
pode obter figuras borradas se não for cuidadoso com o local onde está desenhando e com 
que cor. Entretanto, se você desenhar cuidadosamente com a resolução de 8 cores, poderá 
produzir belas figuras. Mais detalhes sobre as técnicas de desenho avançado serão 
fornecidas mais adiante. 

Vocc pode usar sprites neste modo. Os sprites estão cm um plano do modo de 
tela diferente do plano do modo de tela principal. Isto significa que não importa onde os 
sprites sejam exibidos; cl cs não afetam o que é desenhado no modo de tela principal de 
nenhum mudo. Você irá ver que quando um spnte ocupa uma parte do modo de tela em 
particular, o modo de tela principal continua totalmente inalterado. 

No modo gráfico 2, a lista das teclas de função não pode ser exibida. Você 
também irá descobrir que o comando PRINT não funciona neste modo. Para imprimir no 
modo gráfico de tela você deve abnr um arquivo no modo de tela usando PRINT#. Istu 
será explicado com mais detalhes na seção de impressão em modo gráfico. 

O comando COLOR não altera as cores imediatamente neste modo. Para alterar 
as cores de um modo de tela inteiro você deve executar um comando CLS. 

Você nõo pode usar o comando INPUT neste modo, porque ele força o modo dc 
tela a retornar para o modo de texto usado anlenormente. 

MODO 3: GRÁFICOS DE BAIXA RESOLUÇÃO MULTICORES DE 64 x 48 

A 

48 BLOCOS 


T 


64 BLOCOS 


(0,0) 

(255.0) 

(0.191) 

(255,151) 
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O MODO 3, Multicolorido, dá uma resolução baixa de 64 por 48 blocos, mas os 
blocos individuais podem ter suas próprias cores (ao contrário do MODO 2). Você não irá 
obter efeitos de borrões como no MODO 2. 

Suas coordenadas são as mesmas do MO IX) 2; mas grupos de 4 por 4 pontos, 
representam um bloco. Isto permite que você desenhe nas mesmas coordenadas como no 
MODO 2, o que é vantajoso. 

Vocc pode usar sprites neste modo da mesma maneira que no MODO 2. 

No MODO 3, a lista das teclas de função não é exibida. Você também 
descobrirá que o comando PRINT não funciona neste modo. Para imprimir no modo 
gráfico de tela, você deve primeiro abrir um arquivo no modo de tela e usar PRINT#. O 
tamanho dos caracteres impressos será 4 vezes maior que no MODO 1 e 2. Isso será 
explicado com mais detalhes na seção de impressão em modo gráfico. 

O comando COLOR não altera a cor imediatamente neste modo. Para alterar a 
cor do modo de tela inteiro, vocc deve usar o comando CLS. 

Você não pode usar o comando INPUT neste modo pois iria forçar o modo de 
tela de volta para o modo de tela usado anteriorroente. 
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CORES NO MODO 2 DE ALTA RESOLUÇÃO 


Este capítulo trata exclusivamente da maneira como as cores são usadas no 
MODO 2. O comando COLOR define a cor para o fundo, do texto e das margens atuais. 
Entretanto, a cor de fundo do modo dc tela inteiro não irá alterar-se a menos que você o 
limpe com um comando CLS. Após o comando COLOR ter sido executado, qualquer 
ponto, linha ou figura desenhada será na nova cor de texto, a menos que outra cor seja 
especificada dentro de comandos de desenho. 

A resolução de cor do MODO 2 é de 32 x 192 pontos. Isto significa que você 
pode selecionar duas cores por bloco horizontal de 8 x 1 ponto. Você pode especificar 
as cores de fundo e de texto para cada bloco de 8 pontos mas. sc você tentar desenhar um 
ponto com uma terceira cor sobre um ponto que já tenha duas cores, os pontos na cor de 
texto dentro desse bloco irão alterar-se para essa nova cor de texto automaticamente, 
podendo causar efeitos de borrões se você não for cuidadoso. O pequeno programa ahaixo 
demonstra isso: 


IO SCREEN 2 
20 COLOR 4, 15, 1 ri 
30 CLG 

40 LINE (0,0)— (4, 191) ,4, RF 
50 IF NOT STRIG(O) TUEN 50 
60 LINE (6, 0>-<&, 191 > , 10 
70 GOlü 70 
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LINHA 10 SELECIONA MODO 2 

LINHA 20 DEFINE O FUNDO COMO BRANCC 

LINHA 30 LIMPA O MODO DE TELA DANDO A COR BRANCA 

LINHA 40 DESENHA UM RETÂNGULO EM AZUL 

LINHA 50 ESPERA ATÉ QUE A BARRA DE ESPAÇOS SEJA PRESSIONADA 
LINHA 60 DESENHA UMA LINHA EM AMARELO-ESCURO JUNTO AO 
RETÂNGULO AZUL 

LINHA 70 FICA NO MODO GRÁFICO DE TELA 


Execute este programa. Em primeiro lugar, você verá um retângulo azul 
desenhado sobre o fundo branco, no centro do modo de tela. Então, se você pressionar a 
barra de espaço < espaços >, verá uma linha amarela sendo desenhada e o retângulo azul 
ficará amarelo. Por que a cor do retângulo azul mudou ao desenharmos uma linha 
amarela ao redor dele? 

Para entender o que aconteceu, vamos ver como os alributos de cores são 
armazenados na RAM do vídeo (VRAM). 

Se você pegar a seção do canto superior esquerdo do modo de tela c ampliá-la, 
ela pode ser representada como se fosse a tabela a seguir (A significa azul e B significa 
branco): 


Y X 

* 0 

1 

2 

3 

4 

5 

6 

7 

5 

9 


0 

A 

A 

A 

A 

8 

B 

B j 

B | 

6 

B 




1 

A 

A 

A 

A 

9 

B 

B 

B 1 

B 

B 




7 

4 

A 

A ' 

A 

9 

B 

B 

B 

1 

B 

B 




3 

A 

A 

A 

A 

B 

■8 

B 

B 

0 

j" 

1 



4 










1 





Dentro da R AM do vídeo do MSX, a figura acima está armazenada em código 
binário como mostrado a seguir. Cada bit corresponde a um ponto na tela, 1 = cor de texto 
c 0 = cor de fundo. Neste caso. 1 representa o azul e 0 o branco. 


0123456789 


1 

1 

1 

1 

0 

0 

0 

0 

0 

.0 

0 

0 


1 

1 

1 

1 

0 

0 

0 

0 

0 

0 

0 

0 


1 

1 

1 

1 

□ 

□ 

a 

a 

0 

0 

0 

0 


1 

1 

1 

1 

0 

0 

0 

0 

0 

a 

a 

□ 










1 
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Entretanto, esta tabela de memória não revela a cor de cada ponto. Isto porque 
existe uma tabela separada de atributo de cor na VRAM que contém as cores de fundo e 
de texto para cada bloco de 8 x 1 ponto. Vamos pegar o bloco do canto superior 
esquerdo e ver como o seu padrão de cores é armazenado na memória. 


TABELA DE PADRÕES 
0 1 2 3 4 5 6 7 


1 

1 

1 

1 

0 

0 

0 

0 


















TABELA DE 
ATRIBUTOS DE COR 
1 0 


4 

15 




Como vocé pode ver, enquanto a tabela de padrão informa que o bit está na cor 
de fundo ou de texto, a tabela de atributo informa a você qual é a cor de fundo e a qual de 
texto. Isto significa que é fisicamente impossível colocar mais dc duas cores por bloco. 
Desse modo, quando vocc tentar desenhar uma linha amarela na coluna 6, em primeiro 
lugar a cor de texto na tabela de atributo será alterada para o código de cor do amarelo, 
isto é, 10, c então o ponto 6 será definido para a nova cor de texto: 


TABELA DE PADRÕES 
0 1 2 3 4 5 6 7 


1 

1 

1 

m 

m 

0 

1 

0 










TAULLA DF 
ATRIBUTOS DE COR 


1 

0 

10 

15 




Os pontos 0, 1, 2 e 3 permanecem na mesma cor de texto, mas agora a própria 
cor de texto foi alterada do azul para o amarelo, e por isso a cor dos pontos 0, 1, 2 e 3 
também mudou. 

A explicação 6 simples quando você a vê em termos de tabela de memória, 
não é mesmo? 

Desse modo. o que devemos fazer para resolver esse problema? Existe somente 
uma resposta: não usar mais de duas cores em um bloco. 

Por exemplo, o programa anterior pode ser alterado de modo que a linha amarela 
não seja desenhada no mesmo bloco do retângulo azul, movendo a figura inteira para a 
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esquerda em dois pontos. O programa melhorado, que desenhará um retângulo azul e uma 
linha amarela em seus lados, se parecerá com o seguinte: 

10 SCREEN 2 
20 COLOR 4 , 13, 15 
30 CLS 

40 LINE <2,0> — <é», 191 > ,4, RF 
50 IF NOT STR IG ( O) THFN 50 
60 LINE <8,0>-<B, 191 ) , lô 
70 GOTO 70 

LINHA 10 SELECIONA O MCDO 2 

UNHA 20 DEFINE A COR DE FUNDO PARA BRANCO 

LINI IA 30 LIMPA O MODO DE TELA E COLOCA A COR BRANCA 

LINHA AO DESENHA UM RETÂNGULO EM AZUL 

LINHA 50 ESPERA ATÉ QUE A BARRA DE ESPAÇOS SEJA PRESSIONADA 
LINHA 60 DESENHA UMA UNHA EM AMARELO-ESCURO AO REDOR DO 
RETÂNGULO AZUL 

LINHA 70 MANTEM O MODO GRAFICO DE TELA 

Observe as alterações feitas nos especificadores de eooideiiadas nas linhas 40 
a 60. 

Nota: Se você quiser saber mais sobre como o modo de tela é armazenado na 
memória RAM de vídeo, vá para a seçüo de RAM de vídeo. 
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GRÁFICOS AVANÇADOS III 



COMO IMPRIMIR NO MODO GRAFICO DE TELA 
USANDO ARQUIVOS 


Imprimir no modo gráfico de leia não é exatamente a mesma coisa que imprimir 
no modo de texto. Você deve abrir um arquivo no modo gráfico de leia e então usai o 
comando PRINT#. De fato. você pode abrir um arquivo para um modo de tela dc texto sc 
quiser, mas isso não <$ necessário. 

Hs um programa dc demonstração que imprimirá em quatro mudos de Leia, 
usando arquivos. A linha 30 abre os arquivos cm função do modo (M) dc tela selecionado. 
Ria executa OPEN "CRT:” AS#1 quando M for menor que 2. Isto significa abrir um 
arquivo para um modo dc tela dc texto (“CRT:” AS, arquivo niímero #1). Quando 
M for maior ou igual a 2, então o comando executa OPEN “GRP:*‘ AS#1 que significa 
abrir um arquivo para o modo gráfico dc tela. Um arquivo aberto deve ser fechado assim 
que a sua função tiver terminado. Isto é feito na linha 50: CLOSE# I. 

10 FOP T03 

20 SCREEN H 

IF M< 2 THEN OPEN"cr t : "AS tti ELSE OPEN "grp:" AS *1 
40 PPINTtti r "este e o modo 
50 FOR G=i TO Í000=NEXT G 
60 rLOC.FIM 
70 NEXT N 


m 
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LINHA 10 

LOCP DF 0 A 3 

LINHA 20 

SELECIONA O MODO DE TELA 

LINHA 30 

SE MODO TEXTO. ENTÃO ABHA MODO DE TELA GRÁFICO 
• CRT:- SENÃO ABRA “GRP:” 

LINHA 40 

IMPPIME UMA MENSAGEM 

LINHA í>0 

ESPERA 

LINHA 60 

FECHA C ARQUIVO 

1 INHA 70 

PRÓXIMO MODO 


Neste programa, você verá o modo de tela mudar para cada modo diferente 
enquanto imprime a mensagem “ESTE É O MODO...”. Observe que no modo de tela de 
alta resolução a impressão 6 basicamente no mesmo formato que no MODO 1, isto é, 
32 x 24 caracteres. No MODO 3, o texto tem quatro vezes o tamanho normal do modo 
texto. Isto porque o modo multicores 6 de baixa resolução, c para se imprimir caracteres 
ele precisa fazer isso em blocos gráficos (de 4 x 4 pontos). 


COMO ESCREVER NO MODO 2 DE ALTA RESOLUÇÃO 

Quando se imprime um texto no MODO 2 voc£ não pode usar o comando 
LOCATE para posicionar os caracteres a serem impressos. Isto se deve ao fato de o 
computador não usar o cursor de texto no modo gráfico. Em vez disso, ele usa o cursor 
gráfico e, dessa forma, o computador imprime o texto na última posição do cursor gráfico. 
Para posicionar os caracteres a serem impressos, use o comando DRAW. 

Programa exemplo: PRINT 1t e PRINT # USING no modo gráfico 2 


10 SCREEN 2 

20 OPEN ••GRP: M AS Ml 

30 DRAW , BM100,100" 

40 pRiNTMi, -nnrnRRO" 

50 DRAW "RM 102, 102" 

60 PR INTUI , "SOCORRO" 

70 DRAW " BM 1 00, 1 20 " 

R0 PR 1NT#1 , US1 NG- #M# . ••MM»##" i ATN < 1 ) *4 
90 GOTO 90 



232 


MSX - Guia do Proçrarruidor 


LINHA 10 
LINHA 20 
LINHA 30 
LINHA 50 
LINHA 60 
LINHA 70 
UNHA 80 
LINHA 9C 


SELECIONA C MODO DE TELA 2 

ABRE O ARQUIVO PARA GRP 

POSICIONA O CURSOR GRÁFICO E IMPRIME AÍ 

REPOSICIONA O CURSOR 

IMPRIME SOCORRO NCVAMENTE 

REPOSICIONA O CURSOR OU~RA VEZ 

PRINT# USING 

MANTÉM O MODO GRÁFICO 


No exemplo anterior você verá duas mensagens ••SOCORRO”, uma em cima da 
outra. Isto acontece porque, no modo gráfico, o computador não apaga antes de imprimir, 
podendo criar alguns efeitos interessantes, mas frequentemente é um aborrecimento. 
A tínica maneira de apagar o que está impresso em uma parte do modo de tela é usar o 
comando LINLi e escrever em cima com um retângulo preenchido na cor de fundo. 

Se você incluir a linha: 


4b LINE (100.1O3J-SÍ EP(43.B),4,BF 

apagará a mensagem “SOCORRO” escrita na linha 40, evitando a sobreposição. 

Como pôde ver no programa anterior, você também pode usar PRINT USING 
no formato PRINT# USING. As várias sintaxes de PRTNT USING são as mesmas para os 
diversos modos gráficos, bem como para os modos texto. 


COMO IMPRIMIR COM CORES NO MODO 2 GRAFICO 


Uma das vantagens de se impnmir em um modo grálico é a de se poder usar 
todas as 16 cores para imprimir caracteres, bem como gráficos. Para imprimir na cor 
especificada, você tem de especificar a cor de texto antes de usar o PRINT#. 

Eis um exemplo para ilustrar a impressão em 16 cores: 

10 COLOR i,í5 r í5 
20 RCREFN 2 
H0 OPEN "grp:" AS L 
40 FOR 1=0 TO Í5 
50 COLOR T 
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60 DRAW"bm+8 T 0" 

70 PRINTttí ,"Cor codigo"?I 
80 NEXTI 
90 GOTO 90 


I INHA 10 A COR DE FUNDC É BRANCA 
LINHA 20 MODO DE TELA 2 

LINHA 30 ABRE O AROUIVC PARA GRP COMO ti 1 

LINHA 40 LOOP DE 0 A 15 

LINHA 50 COR DO LOOP 

LINHA 60 MC VE C CURSOR GRÁFICO 

LINHA 70 MENSAGEM 

LINHA 80 PRÓXIMO LOOP 

LINHA 90 MANTEM O MODO DE TELA 


Este programa produzirá a seguinte exibição: 


CÓDIGO DE COR 0 
CÓDIGO DE COR 1 
CÓDIGO DE COR 2 
CÓDIGO DC COR 3 
CÓDIGO DE COR 4 
CÓDIGO DE COR 5 
CÓDIGO DE COR 6 
CÓDIGO DF COR 7 
CÓDIGO DE COR 8 
CÓDIGO Dfc COR 9 
CÓDIGO DC COR 10 
CÓDIGO D6 COR 11 
CÓDIGO DE COR 12 
CÓDIGO DE COR 13 
CÓDIGO DE COR 14 
CÓDIGO DF COR 15 


TRANSPARENTE 

PRE-0 

VERDE (MÉDIO) 
VERDE (CLARO] 

AZUL (ESCURO) 

AZUL (CLARO) 
VEHMELHO (ESCURO) 
C1AN 

VERMELHO «MÉDIO) 
VERMELHO (CLARO) 
AMAHELO (ESCURO) 
AMARELO (Cl ARO) 

VE PDF (ESCURO) 
MAUENTA 
CINZA 
BRANCO 


COMO IMPRIMIR NO MODO GRÁFICO 3 MULTICORES 


No MODO 3 Multicores, o texto tem quatro vezes o tamanho do modo normal 
porque a exibição gráfica é de baixa resolução. Por isso, para impnmir caracteres gráficos, 
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devem ser usados blocos gráficos, c os caracteres resultantes são enormes. Ris um 
programa de demonstração: 


10 5CREEN 3 

?a npFN -gr P s - os #i 
30 DRAW "Rrlfl.O" 

40 PR] NT# 1 , "PT" 

50 DRAW 

60 PRINTtfl ,USING 
70 GOTO 70 


LINHA 10 
LINHA 20 
I INHA 30 
LNHA40 
LINHA 50 
LINHA 60 
LINHA 70 


SLLLCIONA ü MODO MULTICORES 

ABRE UM ARQUIVO PARA O MODO GRÁFICO DE TELA 

POSICIONA O CURSOR 

IMPRIME “PI" 

REPOSICIONA O CURSOR 
IMPRIME O VALOR DE PI 
MANTÉM O MODO GRÁFICO DE TELA 




CAPÍTULO 43 


GRÁFICOS AVANÇADOS IV 


r 



OS SPRITES 


O processador de exibição de vídeo do MSX tem a facilidade de produzir 
sprites. Sprites são caracteres ou figuras definidas pelo usuário, que podem ser exibidos no 
modo de tela sem afetar o modo gráfico de tela de fundo. Isto porque os sprites são 
exibidos em planos dc modo de tela diferentes. Eles podem ser escondidos uns atrás dos 
outros e podem ser movidos sem provocar confusão. Eles dão a você o poder dc criar 
jogos e animações sem muitos problemas com os gráficos. 


TAMANHO DOS SPRITES 


Existem quatro tamanhos de sprites que você pode utilizar, sendo somente um de 
cada vez. O tamanho é determinado usando-se o comando SCREEN. 


COMANDO 

TAMANHO 


SCREEN.Q 

8 cor 8 

ponto não ampliado 

SCREEN, 1 

8 por 8 

ponto ampliado para 16x16 

SCREEN, 2 

16 cor 16 

ponto não ampliado 

SCREEN, 3 

16 por 16 

porto ampliado para 32 x 32 
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Observe que a ampliação fornece uma resolução de 2x2 pontos. 


DEFININDO SPRITES: SPRITES 


Você pode definir os seus sprites usando SPRITES. Você pode ter até 256 
padrões dc sprites quando estiver usando os tamanhos de sprites 0 ou 1 (8 x 8 pontos), ou 
64 nos tamanhos 2 ou 3 (16 x 16 pontos). 


Sintaxe 


SpriteS (<intciro>)=< string > 

cmtcirc» = número de padrão do sorite 
< inteiro > = 0 a 255 quanco o.spntc for 0 ou 1 
< inteiro > = 0 a 63 quando o sprite for 2 ou 3 

SPRITES é uma string. O tamanho da string sprite é Fixado em 32 bytes (ou 
caracteres), para sprites pequenos (8x8) você somente precisa definir os primeiros 
8 bytes. 

Cada byte na string representa uma linha de 8 pontos, e é somada na string do 
sprite incluindo um caractere com o código ASCII igual ao do byte. Isso pode ser feito 
simplesmente usando-se a função CHR$. Por exemplo, para definir um sprite de 8 x 8 
pontos: 


SPRITES (cinteiro>)=CHR$(<pnm linha>)+CHR$(<seg. linha>)+CHH$(<terc. 
Knha>)+CHRS(<qca. Inha>)-*-CHPS(<qui. linha >)+CHR$(<üex. 

Snha > ) +CHRS( < sei. linha >)+CHRS(<oit. Imha>) 

A função CHR$( ) pode ser substituída pelo caractere atual se você souber qual é. 

Para de finir um sprite de 16 x 16. você deve definir lodos os 32 bytes do padrão 

do sprite. 

Eis um bom modo para definir um sprite de 8 x 8 pontos. 
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Em primeiro lugar desenhe o seu sprite em um papel. 


128 

64 

32 

16 

8 

4 

2 

1 


BINÁRIO 


DECIMAL 




1 

• 

• 

• 

* 

= 

&B00010000 

= 

16 



1 

1 

• 

• 

• 

• 

= 

&B001 10000 


48 


1 

1 

1 

• 

• 

• 

• 

= 

&B01110000 

= 

112 

1 

1 

1 

1 

1 

1 

1 

1 

- 

&B1 1111111 

- 

255 

1 

i 

1 

1 

1 

1 

1 

1 

— 

&B1 1111111 


255 


1 

1 

1 


• 

• 

• 

= 

&B01 110000 

= 

112 



1 

1 

• 

• 

• 

• 


&BG01 10000 

- 

48 

• 



1 


• 

• 



&B00010000 


16 


Desta forma, você pode formar uma expressão dc strings como a seguinte: 


BPRHE$(0|=CHH$(16) 4 CHRS(48) +CHH$[1*2)+CHR$(2bò)+CHR${255) + 
CHR$(1 12)+CHRS(48)+CHR$(16l 

Exemplo: 


Usar n ií meros binários é o melhor caminho para definir um sprile, pois é fácil 
ver como o sprite vai aparecer no programa. 


10 SCREEN 2,0 
20 FOR 1*1 TO 8 
30 READ AS 

40 SS=S%*CHPS(VALC"&B"+AS> ) 

50 NEXT I 
60 SPRITE%(0)=S% 

70 PUT SPRITE 0, <100, i00>, 15,0 
80 GOTO 80 

90 REM DADOS BINÁRIOS 
100 DATA 00010000 
110 DATA 00110000 
120 DATA 01110000 
130 DATA iiliiili 
140 DATA Iiliiili 
150 DATA 0Ü10000 
1Ó0 DATA 00110000 
170 DATA 00010000 
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UNHA 10 EMPREGA O MODO DE IELA DE ALTA RESCLUÇÁO, SPRITE DE 
TAMANHO NORMAL 

LINHA 30 LÉ OS NÚMEROS 3INÁRIOS COMO STRING 
LINHA 40 SS É UMA STRING ítMPORÁRIA 
LINHA fiO DEFINE O SPRITE 0 

LINHA 70 COLCCA O SPRITE O EM x=100.y=100 COR BRANCA. NO 
PLANO 0 DO SPRITE 

Resultado: você vê uma flecha no meio do modo de tela. 

Vamos tratar mais adiante do comando PUT SPRITE detalhadamente. 

Se você acha “chato' calcular os valores decimais de cada byte, entáo 
o programa pode ser escrito em uma versão mais curta. O programa acima pode ser 
reduzido às seguintes poucas linhas: 

10 SCRFFN 2,0 

20 SPRITE* <0>=CHR*< í 6 ) +CHR* ( 48 > * CHR* < 1 1 2 > 4CHR* < 2S5 > -f CH 
R*( í 12>+CHR*(48)+CHR*< 16 > 

70 PUT SPRITF 0,<í00 r 100>,í5,0 
80 GOTO 80 

UNHA 10 EMPREGA O MODO DF TELA DE ALTA RESOLUÇÃO. SPRITE DE 
TAMANHO NORMAL 
UNHA 20 DEFINE O SPRITE 0 

I INHA 70 COLOCA O SPRITE 0 EM x=100.y=100, COR BRANCA NO 
PLANO 0 DC SPRITE 
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00011111 - 31 
00111111 - 63 
011U0U00 = 06 
11000111 = 199 
11001000 = 200 
01101UOÜ = 104 
01100100 = 100 
00110011 = 51 


11111000 = 240 
11111100 = 252 
00000110 = 6 
11100011 = 227 
00010011 = 19 
00010110 = 22 
00100110 = 38 
11001100 = 204 


00110100= 5200101100= 44 
00011011 = 27 11011000 = 216 
00011000 = 24 00011000 = 24 
00001100 = 12 00110000 = 48 
00001100 = 12 00110000 = 46 
00000110 = 6 01100000 = 96 
00000011 = 3 11000000 = 192 
00000001 = 1 10000000 = 128 
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Os padrúes de SPRITE 16 * 1 estão armazenados na RAM de vídeo da seguinte 

maneira: 


Um SPRITE} 16 x 16 = “Sprite do quadrante 1” + “Sprite do quadrante 2 " + 
“Sprite do quadrante 3” + “Sprite do quadrante 4”. 

Eis um programa razoavelmente eficiente que define e exibe o sprite de 16 x 16 
que projetamos anteriormente. Os dados estão armazenados nos DATA e são incluídos um 
a um no SPRITE} no loop FOR/TO/NEXT. 



'6 


8x8 

1 

8x8 

3 

6x8 

2 

8x8 

4 


10 SCREEN 2,2 
20 FOR 1=1 TO 32 
30 READ BX 
40 SS=S*+CHR%(B3:> 

50 NEXT I 

60 SPRITE*<0>=SS 

70 PUT SPRITE 0, (100,100) ,15.0 

80 BOTO 80 

90 DATA 31.63.96,199,200,104,100,51 
100 DATA 52,27,24,12,12,6,3,1 
1Í0 DATA 248,252,6,227,19,22,38,204 
120 DATA 44 .216,24.48,48,96,192, 128 


LINHA 10 

LINHA 20 
LINHA 30 
LINHA 40 
LINHA 60 
LINHA 90 
LINHA 100 
LINHA 110 
LINHA 120 


EMPREGA O MODO DF TELA 2 COM TAMANHO DE SPRITE 

DE 16 POR 16 

LOOP PARA LER 32 BYTES 

LER 

INCLUI DADOS EM S$ 

DEFINE A STRING DO SPRITE 0 
DADOS PARA O QUADRANTE 1 
DADOS PARA O QUADRANTE 2 
DADOS PAPA O QUADRANTE 3 
DADOS PARA O QUADRANTE 4 
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COMO COLOCAR UM SPRITE NO MODO DE TELA: PUT SPRITE 


Existem 32 planos de sprite em frente dos planos de texto/gráfico, com o 
plano sprite n 9 0 na frente de todos. Isto significa que quanto menor o mimero do plano 
maior a prioridade. Se existirem dois sprites sobrepostos, aquele com o menor ndmcro de 
plano será exibido na frente, com o outro escondido atrás. 

Você pude definir até 256 padrões de sprites, mas somente um sprite pode ser 
exibido em um plano em particular. Isso limita o odmero máximo de sprites exibidos ao 
mesmo tempo a 32. 

Mais ainda: você s<5 pode colocar um máximo de quatro sprites por linha 
horizontal. 

Para colocar um sprite no modo de tela, use o comando PIJT SPRITE. Ele 
tem a seguinte sintaxe: 

/ 

PUT SPRITE <núrrero du plano do sprite>[ ^'especificador de coordenada >][,< cor >)|, 

< número do spntoj 

O <niímcrodoplanodosprite> tem uma faixa de 0 a 31. 

0 ccspccificador de coordenada> diz ao computador onde colocar o canto 
superior esquerdo do sprite. 

Existem dois formatos de <especificador dc coordenadas > : 

1 .(< coordenada x>,< coordenada y>) 

Isso especifica uma posição absoluta no modo dc tela. 

2. STEP(<x>,<y>) 

Estas coordenadas são as coordenadas de um ponto relativas ao iSItimo 
ponto referenciado. 

<x>,<y>, < coordenada x> e < coordenada y>, podem ser variáveis ou expressões, 
bem como simples constantes numéricas. Isto significa que os sprites podem ser 
controlados por variáveis permitindo a você movê-los suavemente. 

Se o (<especificador de coordenada >) for omitido, então o computador 
colocará o SPRITE no ultimo ponto referenciado. 
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Exemplos : 

P JT SPRITE 0. (50.50). 1 .1 

PüTSPRITE I STEP(10. 10). 12,2 

(J modo dc tela de sprite é ligeira mente maior que o modo de tela de exibição 
normal. Ele tem uma faixa entre -32 e 255 na coordenada x e entre -65 e 248 na 
coordenada y. As faixas de coordenadas reais dos modos de telas são menores, de modo 
que, se o sprite for colocado fora do modo de tela de exibição real, ele será escondido 
parcial ou totalmente. 

Os sprites têrn a facilidade de unir us extremos do modo de tela. Isto significa 
que se um sprite sair fora do modo de tela. ele aparecerá outra vez no canto oposto 
da tela. 


TELA DE FUNDO 



£5 


TELA DE SPRITE 
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A tela de sprite. 


-65 


0 


TFLA DF FUNDO 


191 


248 


V T 


255 

► X 


COMO MOVER SPRITES 


Alterando o valor do <especificador de coordenadas no comando PtJT 
SPRITE, você pode mover o sprite para qualquer lugar da tela. Quando o comando PUT 
SPRITE é executado, o sprite anterior na antiga localização do modo de tela é apagado 
automaticamente. 

Este programa-exemplo exibe um quadrado movendo-se lentamente da direita 
para a esquerda, indo através do modo de tela para a esquerda e aparecendo pela direita. 

10 SCREEN 2 r 0 

20 SPRITES ( 0 ) =STR TOTjS CR, CHR^ C 255 ) ) 

30 FOR X=200 TO -200 STEP -í 
40 PUT SPRITE 0 , <X, 100) , 15,0 
50 FOR D=i TO 50 = NEXT D 
A0 NEXT 
70 END 
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LINHA 10 SELECIONA O MODO DE TELA, TAMANHC NORMAL 
LINHA 20 DEFINE O SPRITE QUADRADO 
UNHA 40 COLOCA O SPRITE EM X.100 
LINHA 50 ESPERA 


CORES DOS SPRITES 


Vocé pode usar qualquer uma das 16 cores. EnlreUmlo, pode usar somente uma 
cor por sprite, de modo que não é possível ter um sprite multicolorido. Para simular um 
sprite multicolorido, coloque dois ou mais sprites de diferentes cores em cima dc outro cm 
diferentes planos dc sprites e mova-os juntos. 

Observe que a cor de fundo de um sprite é sempre transparente, de modo que 
você pode ver através do vazio do sprite. 

liste exemplo define dois sprites. 0 e 1. O sprite mírnero 0 é exibido em branco e 
o sprite número I em amarelo-escuro. Na exibição você verá cada um dos sprites 
separadamente, bem como a combinação dos dois que simula um sprite multicolorido. 

10 SCREEN 2,0 

20 SPPITE*<0)=CHR*< 16) +CHR*.C4B)+CHR*< 1 1 2 ) +CHR* < 255 ) +CH 
RI. <255) +CHRSI ií2)+CHP%<48)+CHR*<16> 

30 SPP I TE* < 1 ) =CHR$ < 224 ) +CHR* < í 92 ) +CHR* ( i 28 ) +CHRS C 0 ) +CH 
R* < 0 ) +CHP* < 128 ) +CHR* ( 192 ) +CHP * C 224 > 

40 PUT SP P T TF 0 r (20,20) , 15,0 
50 PUT SPRITE 1 , (40,40) ,10,1 
60 PUT SPRITE 2. (60,60) ,15.0 
T0 PUT SPRITE 3 , < 60 , 60) , 1 0 r í 
00 COTO 00 

I INHA 10 SELECIONA O MODO DE TELA. TAMANHO NORMAL 
LINHA 20 DEFINE O SPRITE 0 
LINHA OU DEFINE O SPRITE 1 
LIM IA 40 COLOCA O SPRI1 E 0 EM BRANCO 
LINHA 50 COLOCA O SPRITE 1 EM AMARELO-ESCURO 
LINHA 4U COLOCA OS SPRITES 2 E 3 NAS MESMAS COORDENADAS 
USANDO 2 CORES EM DIFERENTES PLANOS DE SPRITES 
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COMO ESCONDER SPRITES 


Sc você der um numero especial à coordenada y, você pode desativar os 

sprites: 


y =208 


Se for fornecido 208 (&HDO) à coordenada y, lodos os planos de sprites 
maiores serão desativados até que um valor diferente de 208 seja dado a esse plano. 

10 SCRFEN 2,0 

20 SPRITES(0)=STRINGS(0,CHRS(255> ) 

30 PUT SP RITE 0, <20,20) ,15,0 
40 PUT SPRITE í , <40, 40) r 15,0 
50 PUT SPRITE 2, <60,208) , t5,0 
60 PUT SPRITE 3, <80,80) , Í5,0 
70 PUT SPRITE 4 , < 100, 100) ,15,0 
80 GOTO 80 

UNHA 10 SELECIONA O MODO DE TEIA. TAMANHO NORMAL 
UNHA 20 DEFINE UM SPRITE QUADRADO 

LINHA 50 V — DESATIVA CS SPRITCS DC PLANO 2 PARA A FRENTE: 

CS SPRITES DAS UNHAS 60 E 7C NAO SÃO EXIBIDOS 

Se for especificado y + 209 (&HOI) para y, então este sprite desaparece da tela. 

Í0 SCREEN 2,0 

20 SPRITES(0)=STRINGSC8 r CHRSC255> ) 

30 PUT SPRITE 0, <20,20) , 1 5,0 
40 PUI SPRITE i , < 40, 40) , 15,0 
50 PUT SPRITE 2, (60,209) , 15,0 
60 PUT SPRITE 3, <80,80) r 15,0 
70 PUT SPRITE 4, (100,100) ,15,0 
R0 GOTO 00 

LINHA 10 SELECIONA O MODO üb TELA. T Ar/ AN HO NORMAL 

UNHA 20 DEFINE O SPRITE 0 

UNHA 30 SPRITE QUADRADO NO PLANO 1 

UNHA 40 SPRITE QUADRADO NO PLANO 2 
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LINHA 50 Y=2C9 DESATIVA ESTE SPRITE 

UNHA 60 SPHIÍb GUAüRAüO NO PLANC 3 
LINHA 70 SPRITE CUADRADO NO PLANC 4 


A REGRA DO ' QUINTO” SPRITE 


Existe um limite máximo de quatro sprites que podem ser exibidos em uma linha 
horizontal. Se essa regra for violada, então somente os quatro sprites com os últimos 
numeros de planos de sprites serão exibidos normal mente. O restante não será exibido 
nessa linha. O numero de sprite do quinto sprite, que violou a regra, pode ser encontrado 
no registrador de status VDP usando a função VDP (veja a seção da função VDP). 


Exemplo: 

Í0 SCREEN 2,0 

20 SPRITE%(0)=STRING*(8,CHR*(255> ) 

30 PUT SPRITE 0, <20,100) ,15,0 
40 PUT SPRITE i r <40,100) ,Í5.0 
50 PUT SPRITE 2 r < 60 , 100 ) , 15 , 0 
60 PUT SPRITE 3, <B0,Í00) ,15,0 
70 PIIT SPRITE 4,(100, 104) ,15,0 
80 GO IO 80 

LINHA 10 StLECICNA C r/ODO üb IbLAbM I AMANHO NORMAL 

UNHA 20 DEFINE C SPRITE 0 

UNHA 30 SPRITE QUADRADO NA LINHA 100 

LINHA 40 SPRITE QUADRADO NA LINHA 100 

I INHA 50 SPRITF QUADRADO NA UNHA 100 

LINHA 60 SPRITE QUADRADO NA LINHA 100- 

LINHA 70 SPRITE QUADRADO NA I INHA 100 


No exemplo anterior, você verá quatro sprites quadrados, na mesma linha 
horizontal, a linha 100. O quinto sprite está na linha 104 c dessa forma ele mostra somente 
metade do quadrado, a outra metade sendo escondida devido à regra do quinto sprite. Se 
ele estivesse na linha 108, todo o quinto sprite seria visível. 
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ANIMAÇÃO DE SPRITES 


Uma animação simples de sprites pode ser conseguida no MSX com um mínimo 
de trabalho. Tudo o que você tem a fazer 6 trocar rapidamente dois sprites de modo que 
os desenhos pareçam estar sendo trocados. 

Aqui está um programa simples que mostra um invasor espacial com movimentos 
de pernas. O SPRITE$(0) contém o invasor com as pernas fechadas e o SPRITE$(1) o 
invasor com as pernas abertas. 


10 SCREEN 2 t 1 

20 SPRITE*<0>=CHR*< 60>+CHR*< 126)+CHR* < i 29 ) +CHR* < 2 19 ) +C 
HR * < 1 26 ) +CHR * < 3 6 ) +CHR * C 36 > ♦CHR * ( 36 ) 

30 SPRITES ( í )=CHR*(60>+CHR*< 126)+CHR*( 129 ) » CHR* < 21 9 > « C 
HR* < 126 > + CHR* < 36 ) +CHR* ( 60 > +CHR* < 129 ) 

40 PUT SPRITE 0 , < 100. 100) , 1 1 .0 
50 FOR 1=1 TO 5005NEXT 
60 PUT SPRITE 0, <100, 100) , il , i 
70 FOR 1=1 TO 500: NEXT 
80 GOTO 40 

LINHA 20 INVASOR COM AS PERNAS FECHADAS 
LINI IA .10 INVASOR COM AS PERNAS AULR AS 
LINHA 40 SPRITE 0 (PERNAS FECHADAS) AMARELO 
LINHA 50 ESPERA 

LINHA 60 SPHIIb 1 (PERNAS ABtH IAS) Af/AHfcLO 
LINHA 70 ESPERA 


Programa de Demonstração 


Neste exemplo você verá dois planetas orbitando um sol. O sistema inteiro 
flutua a partir do canto superior esquerdo da tela. 

10 SCREEN 2,0 
20 COLOR Í5,i,i 
30 CLS 

40 SPRITE* < 0)=CHR*< 1 26 > -f STR I NGS < 6 r CHP * < 255 ) >+CHR*í í 26) 
50 SPRITE* ( í >=STRING*(3 y CHP*<0) ) +CHR* ( 24 > +CHF * C 2 A ) + STR 
TNR* (3, CHR* ( 0 ) > 
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60 FOR 1=0 TO 6.28 STEP .2 
70 X-X+1.5 
80 Y=Y*1 
90 X1=30*COS(I) 

100 Y i=30*SIN< I ) 

110 X2=15#C0S<I> 

120 Y2=15#SIN<I> 

130 PUT SPRITE 0,<X,Y> r il,0 
140 PUT SPRITE 1, <X1*X,Y1+Y> ,9,1 
150 PUT SPRITE 2,<X2*X,Y2+Y>,15,1 
160 NEXT 
170 GOTO 60 


UNHA 10 EMPREGA A TELA EM TAMANHO NORMAL, MARGENS E 

LINHA 20 FUNDO PRETQ TEXTO PLANO BRANCO 

UNHA 30 LIMPA A TfcLA 

LINHA 40 SPRITE 0 É O SOL 

LINHA 50 SPRITE 1 É UM PLANETA 

LINHA GO LOOP 

LINHA 70 MOVE O SOL COM X DE 1 .5 EM 1 .5 
LINHA «O MOVE O SOL COM Y DE 1 EM 1 

UNHA 90 XI = COORDENADA X PARA O PLANETA 1 

LINHA 100 Y1 = COORDENADA Y PARA O PLANETA 1 

LINHA 110 X2 = COORDENADA X PARA O PLANETA 2 

LINHA 120 Y2 = COORDENADA Y PARA O PLANETA 2 

LINHA 130 COLOCUE O SOL NA NOVA POSIÇÃO 
LINHA 140 COLOQUE O PLANETA 1 NA NOVA POSIÇÃO 
LINHA 150 COLOQUE O Pt ANFTA 2 NA NOVA POSIÇÃO 
LINHA 160 LOOP SEGUINTE 

LINHA 1 70 LOOP OUTRA VEZ 


COMO DETECTAR COLISÕES DE SPRITES 


O VDP TM S 9918/9929 pode detectar colisões de sprites. Isso é útil 
para aqueles jogos que envolvem disparos ou evitar inimigos. Existem dois comandos 
BASIC que tratam da detecção de colisões de sprites - ON SPRITE GOSUB e SPRITE 
ON/OFF/STOP 
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O comando ON SPRITE GOSUB define a sub-rotina de detecção de colisão de 
sprites. Ele diz ao computador que a sub-rotina de detecção de colisão de sprites está 
no nilmero dc linha especificado. 

O comando SPRITE ON ativa a detecção de colisão, que desvia o programa 
para a sub-rotina especificada pelo comando ON SPRITE GOSUB quando dois sprites 
colidem. Vocé deve executar o comando SPRITE ON para iniciar a detecção. 

Se um ponto dos dois sprites se sobrepuser, isso será considerado uma colisão, 
assim como pontos transparentes que se sobreponham. 

Apesar do computador poder detectar uma colisão de sprites, ele não pode dizer 
a você quais sprites colidiram ou mesmo onde a colisão aconteceu. Você deve programar o 
computador para que ele faça isso. 

Uma vez ocorrida a interrupção, isto é, dois sprites colidiram, um comando 
automático SPRITE STDP é executado, parando o computador, chamando a sub-rotina 
outra vez. 

Após ter deixado a sub-rotina de colisão de spntcs, o computador irá executar 
automaticamente SPRITE ON, ativando assim a interrupção, a menos que um SPRITE 
OFF tenha sido executado na sub-rotina. 

O comando SPRITE OFF desativa completamente a detecção de colisões de 
sprites pelo computador. 

Exemplo: 


Neste exemplo, você verá dois sprites quadrados, um amarelo e outro branco, 
aproximando-se um do outro de lados opostos do modo de tela. Quando eles colidem, ON 
SPRITE GOSUB entrará em funcionamento c desviará o BASIC para a sub-rotina de 
colisão de sprites. O SPRITE OFF na rotina de interrupção dc sprite evita qualquer 
detecção posterior de colisão de sprites. Isso foi feito porque os dois sprites ainda estão se 
sobrepondo após o computador ter executado a sub-rotina. Se não houvesse um SPRITE 
OFF aí, o computador iria ficar etemamente nesse loop na sub-rotina de colisão dc sprites. 
(Tente executar esta rotina SPRITE OFF, e veja o que acontece.) 

10 ON SPRITE GOSUB 120 
20 SCREEN 2,0 

30 SP RITE%(0) =STR INGS C 8 , CHP % ( 255 ) 

40 SPRITE* ( i)=STRING*(G,CHR*< 255) ) 

50 FOR 1=10 TO 240 
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60 SPR I TE ON 

70 PUT SPR I TE 0„< 1,100), 11,0 
B0 PUT SPR I TE i r (250-1, 100) ,15,0 
90 NEXT I 
100 GOTO 50 

1Í0 REM SPR I TE -ROT I NA DE COLISÃO 
120 SPR ITE OFF 
130 DEEP 
140 RETURN 

LINHA 10 DEFINE A SUB-ROTINA DE COLISÃO PARA 1 10 

LINHA 20 DEFINE O MODO GHÁFICO DE TELA 

LINHA 30 O SPRFE 0 É UM QUADRADO 

LINHA 40 O SPRFE 1 TAMBÉM 

LINI IA 50 ATIVA O DETECTOR DE COLISÃO DE SPRITES 

LINHA 60 LOOP 

LINHA 70 O SPRFE AMARELO SE MOVE A PARTIR DA DIREITA 

I INHA 80 O SPR ITF BRANCO SF MOVE A PARTIR DA ESQUERDA 

LINHA 90 LOOP SEGUINTE 

LINHA 100 DESVIA PARA A LINHA 50 

LINHA 1 10 INIBE A DETECÇÃO (UMA VEZ É SUFICIENTE) 

LINHA 120 EMITE SOM 

I INHA 130 VOLTA PARA O LOOP 


Notas Sobre Colisões de Sprites 

O computador pesquisa uma colisão de sprite a cada vez que executa um 
comando. Dessa forma podc-sc dizer que o computador pesquisa colisões dc sprites cm 
qualquer intervalo de tempo em particular. 

A função VDP pode dar a vocc o status do indicador (flag) dc colisão dc sprite 
do registrador 8 do processador de vídeo (veja o capítulo seguinte). 


CAPÍTULO 44 
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COMO ACESSAR O PROCESSADOR DE VÍDEO (VDP) 
FUNÇÃO VDP 


O VDP TMS 9929A lem 8 registradores dc gravação c I dc leitura. Você pode 
acessar esses registradores do VDP a partir do BASIC, usando a função VDP. 

Aos registradores dc gravação, VDP(O) a VDP(7), você somente pode afnbuir 
valores. Não existe maneira de sc ler diretamente esses registradores. 

Entretanto, o computador mantém uma cópia desses registradores na área de 
trabalho du sistema. Eles são armazenados na localização de memória entre RGOSAV e 
RG7SAV (veja a parte sobre a RAM do sistema na seção dc referência sobre BIOS, 
para maiores detalhes). 

VDP(8) é o registrador rie leitura. Você pode ler esse registrador conforme é 
mostrado a seguir: 

PRINT VDP(8) 

Você precisa sc lembrar que, sc atribuir um número errado a esses registradores, 
o modo de tela pode ser interrompido. Assegure-se de saber o que está fazendo antes 
de usar a função VDP. 
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REGISTRADORES DO VDP 

Registradores de Gravação 

Registrador 0... VDP(O) 

O registrador 0 contém dois bits de controle do VDP. BIT 1 (M3) e BIT 0 (EV). 

Os bits de 2 a 7 devem ser zero. 

BIT 0 EV: VDP externo. Fie ativa /desativa a entrada de um VDP externo. EV = 0 

para a maioria dos MSX. 
ü = desativa 
1 = ativa 

131! 1 M3: Moda de bit 3. M3 é usado para seleconar o modo de tela e é usado em 

conjunto como registrador 1 (veja registrador 1). 


RO 


B7 

B6 

Bb 

B4 

33 

. B2 

BI 

BC 

0 

0 

0 

0 

0 

0 

M3 

EV =0 


Registrador 1...VDPU) 

O registrador 1 contém sete bits dc controle do VDP. O bit 2 é reservado c deve 
ser sempre zero. 

BIT 0 MAG: Opção de ampliação de sprites 

0 = sem ampliação, 'esolução de 1 x 1 ponto. 

1 = ampliado; resolução dc 2 x 2 pontos. 

BIT 1 SIZE: Seietorde tamanho oara sprites. 

0 = sprrtes de 8 x 8 pontos. 

1 = sprites de 16 x 16 pontos. 

BIT 2 Re se r/ado = 0 


BIT3M2: 


BH de modo 2. M2 è usano na 'a selecionar o modo de tela (veja o bit d). 



















Gráficos avançados V 


253 


BIT 4 Ml: Bit de rnodo 1. Ml é usado para selecionar o modo dc tela. A combinação 

de Ml . M2 e M3 dá c modo de leia. 

Ml M2 M3 

0 0 0 Modo 1 de texto 

0 0 0 Modo 2 de alta resolução gráfica 

0 1 0 Modo 3 de gráfico muRi colorido 

1 0 0 Modo 0 de texto 

BIT 5 IE: Ativador de interrupção 

0 = desativa as interrupções do VDP. 

1 - ativa as interrupções do VDP. 

BIT 6 BL: Ativa 'desativa a tela. Isto permite a você desativar a exibição da tela. 

0 = altera a exibição da tela para branco e mostra somente a cor 

da margem. 

t = ativa a exibição da tela. 

BIT 7 VRAM Selecona o tipo de RAM de video usada. (VRAM=1 dara a maioria dos 
MSX» 

0= 4K RAM 

1 = 16K RAM 



Registrador 2...VDP(2) 

O registrador 2 define o endereço base para a tabela de nomes. A sua faixa vai 
de 0 a 15. Esse registrador representa os 4 bits mais significativos dos 14 bits de endereço 
da tabela de nomes. Dessa forma, você deve escrever no endereço dividido por &H400. 



A 'ota: R2*&H400 = ENDEREÇO DA TABELA DE NOMES 
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Registrador 3...VDP<3) 

O registrador 3 define o endereço base da tabela de cores. A sua faixa vai dc 0 a 
255. Este registrador representa os 8 bits maiores dos 14 bits do endereço da tabela de 
cores. Dessa forma, você deve escrever no endereço dividido por &H40. 



B6 

65 

B4 

B3 

B2 

BI 

BO 



ENDEREÇC DA TABELA D5 CORES 




Nota: R3*&H40 = ENDEREÇO DA TABELA DE CORES 


Registrador *1... VDP(4) 

O registrador 4 define o endereço base da tabela padrão, texto ou multicolorida, 
dependendo do modo de tela A sua faixa vai de ü a 7. Este registrador representa os 3 bits 
maiores dos 14 bits de endereço da tabela padrão, texto ou multicolorida. Dessa forma, 
você deve escrever no endereço dividido por <*Crl !K(Nf 


m 

Bb 

B5 

B4 

B3 

B2 

BI 

BO 

\ ^ 

0 

0 

0 

0 

"ABE LA DE ENDEREÇOS 
P.T.M. 


Nota: R4*&H800 = ENDEREÇO DA TABELA DE GERAÇÃO DE PADRÕES/ 
TEXTO/M ULTICORES . 


Registrador 5...VDI*(5) 

O registrador 5 define o endereço base da tabela de atributos de sprites. A sua 
faixa vai de 0 a 127. Este registrador representa os 7 bits mais significativos dos 14 bits de 
endereço da tabela de atributos de sprites. Dessa forma, vocc deve escrever no endereço 
dividido por &H80. 
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B7 

Bfi 

B5 

B4 

B3 

32 

BI 

BO 

0 

LNÜbHtÇO DA TABfcLA üfc AT RIÔUT OS DOS SPHI ThS 


Nota: R5*&H80 = ENDEREÇO DA TABELA DE ATRIBUTOS DE SPRITES. 


Registrador 6...VDP(6) 

O registrador 6 define o endereço base da tabela geradora de padrões de sprites. 
A sua faixa vai de 0 a 127. Este registrador representa os 3 bits mais significativos dos 14 
bits de endereço da tabela geradora de padrões de sprites. Dessa forma, vocé deve 
escrever no endereço dividido por &H800. 


B7 

B6 

B5 

B4 

33 

B2 

1 

BI 

30 

1 

0 

0 

0 

1 ■ 

0 

0 

FND. TAB. QFR 
PAD. SPRITES 


Nota: R6*&H800 - ENDEREÇO DA TABELA GERADORA DE PADRÕES DE 
SPRITES. 


Registrador 7...VDP(7) 

O registrador 7 é dividido em duas partes. Os 4 bits mais significativos contêm a 
cor do texto do modo texto, enquanto que os 4 bits menos significativos contem a cor de 
fundo para us modos texto e gráfico. 

A sua faixa vai de 0 a 15 para cada cor. 

R7 = <co'de texto>-&HlO+<cor de fundo > 


R 7 


87 

85 

85 

B4 

I 

83 82 

BI 

00 

COR DE PRIMEIRO PLANO 

COR DE FUNDO 
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Registrador de Leitura 
O Registrador de Statns...VDP(8) 

O Registrador de Status contém o indicador de pendência de interrupção, o 
indicador de colisão de sprites c o indicador do quinto sprite. 


Indicador de Interrupção F: BIT 7 

0 indicador de interrupção está em 1 no final da análise do modo de tela. Ele é 
redefinido para 0 após o registrador de status ter sido lido, ou quando o VDP tiver sido 
redefinido extemamente. 


Indicador de Colisão de Sprites C: BIT 5 

0 VDP venfica se dois ou mais sprites se sobrepõem em um ponto. Isto é feito a 
cada 1/60 de segundo. 

1 = colisão de spnte 

0 = sem sobreposição 


Indicador do Quinto Sprite 5S: BIT 6 

5S é definido como 1 quando existir mais de quatro spriles em uma linha 
horizontal (linhas 0 a 192). Observe que o VDP não pode trabalhar com mais de 4 sprites 
em uma linha. Se existirem 5 sprites ou mais, o quinto sprite não será exibido. 


-Número do Quinto Sprite 

Se existirem mais de 4 sprites em uma ünica linha horizontal e 5S estiver em 1 , 
então o número de spnte do quinto sprite é fornecido nos cinco bits menos significativos. 


D 7 

B6 

65 

04 

03 

32 

BI 

B0 

F 

5S 

C 

NÚMERO DO QUINTO SPn/TE 
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GRÁFICOS AVANÇADOS VI 


A RAM DE VÍDEO 

O MSX tem 16K de RAM de Vídeo (VRAM) que está separada da memória 
principal de programação, tila 6 gerenciada c renovada pelo Processador de Vídeo (VDP) 
e, dessa forma, ela é independente do processador central Z80. 

Isso fornece as seguintes vantagens: 

1. O processador Z80 não precisa gerenciar a memória RAM do modo dc tela, 
economizando tempo dessa forma. 

2. Os gráficos e as exibições não usam área preciosa da memória RAM 
principal que é gerenciada pelo Z80. 

A RAM de Vídeo é dividida em várias seções, cada uma com uma função 

rinica. 

É possível acessar a RAM do Vídeo a partir do BASIC usando os seguintes 
comandos e funções: 

BSE Fornece o endereço base de várias tabelas na RAM do Vídeo. 

VPEEK Lê o conteúdo de um endereço da RAM de Vldoo. 

VPOKE Grava em um endereço da RAM de Vídeo. 
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A fiinçáo BASE fornece a posição do endereço base atual de várias tabelas dc 
modos de tela na RAM dc vídeo (veja BASE para maiores detalhes). 


Nome d* Tabela 
e Fndereçoeni Hexadecimal 

Modo 
texto 0 

Modo 
texto 1 

Modo 
gráfico 2 

Modo 
gráfico 3 

de modelos 

&HOOOO 

&H1300 

&H1S00 

&H0800 

dc cores 


&H2000 

&H2000 


de padrões dos caracteres 

&H0800 

&HOOOO 

&H0000 

&H0000 

de atributos dos spriies 


&H1BOO 

&H1B00 

&H1B00 

dc padrões dos spriies 


& 113800 

&H3800 

&H3800 
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EFEITOS AVANÇADOS DE SOM 
USANDO O PSG 


O processador gerador de som do MSX, o AY-3-8912, já existe há algum 
(empo. Ele foi desenvolvido pela General Instruments nos anos 70 e ainda é o mais 
popular processador de som. É muito usado em pequenos sistemas de computadores de 8 
bits e máquinas de fliperama. As razões dc seu sucesso são as suas habilidades para gerar 
até 3 canais de sons periódicos e um canal com ruído, simultaneamente. Além disso, por 
ser ele próprio um microprocessador, quando o som é gerado, o processador não pára as 
operações do processador central. Existem muitas coisas que vocô pode fazer com esse 
gerador de som. 

Este capítulo trata sobre o gerador de som AY-3-891Ü e o uso do comando 

SOUND. 

Como exemplo, tente o pequeno programa a seguir, que gera um barulho 
fantástico de disco voador. 

10 SOUND 0,87 
20 SOUND 7, A 2 
30 SOUND 8,16 
40 SOUND 11,17? 

50 SOUND 12,45 
60 SOUND 13,14 
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FORMAS DE ONDAS GERADAS PELO PSG 


Basicamente, o PSG pude gerar apenas dois tipos de formas de ondas: uma onda 
periódica quadrada e ruído branco. 


ie SGUND 7,Ò2 

29 bUUND 8, 15 

30 SOUND 1 , 1 
40 SÍXIND 0,28 


10 SQIIND 7,55 
20 SOUND 0,15 


Entretanto, existem ondas de som que podem ser modeladas c modificadas cm 
ruídos complexos dc modo que tenham vida própna. Para fazer isso, você precisa 
controlar a frequência, o volume, o tom e o timbre de cada canal de som usando o 
comando SOUND que acessa o PSG. 


REGISTRADOR DE SOM DO PSG 


O AY- 3-8910 tem 14 registradores que você pode alterar usando o comando 
SOUND. que possui a seguinte sintaxe: 

SOUND enumero dc registrador >,< valor a gravar > 

Colocando valores adequados nesses registradores você pode selecionar canais, 
ondas de som, freqüências dp tom, ruído e volumes. 


REGISTRADOR 

0 

1 

2 

3 

4 

5 

6 
7 


DESCRIÇÃO 

Frequência do canal A (menos significativo). 
Frequência do canal A (mais significativo). 
Frequência do canal B (menos significativo). 
Frequência do canal 3 (mais significativo). 
Frequência do canal C (menos significativo), 
rrequência do canal C (mais significativo). 
Frequência do gerador de ruído. 

Ativa ou cesativa os canais A, B e C para sons. 
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8 Controle de volume para o canal A. 

9 Controle dc volume para o canal B. 

10 Controle de volume para o canal C. 

1 1 Período do envelope (byte menos significativo). 

1 2 Período do envelope (byte mais Significativo). 

13 Padrão do envelope. 


ESCOLHENDO O SOM PARA CADA CANAL: 
REGISTRADOR 7, O MISTURADOR 


Este 6 o registrador que ativa ou desativa o som para os tiês canais. Ele pode 
selecionar a fonte da onda sonora a partir do gerador de ruído ou a partir de um gerador 
individual de tom para cada canal. 

Os bits 5, 4 c 3 do registrador 7 ativam o gerador de ruído para os canais C.Rc 
A respectivamente. 1 significa desligado e 0 ligado. Os bits 2, 1 e 0 do registrador 7 
ativam o gerador de tons para os canais C, B c A respectivamente. Dessa forma, por 
exemplo, se você quiser que o canal C emita um tom. o bit 2 deve estar posicionado em 0. 


BIT 


96 

85 

B4 

83 

B2 

BI 

BO 


1 

/ 


RUlDO 


TOM 


■ 

/ 

/ 

C 

B 

A 

C 

B 



n 

0 

1 

1 

1 

0 

1 


M 



OFF 

OFF 

OIT 

ON 

OFF 

-1 



O formato do comando SOUND para esta tabela é: 

SOUND 7.&B0011 1011, OU, em decimal, SOUND 7,59 

O tom do canal A depende dos registradores 0 e 1 ; daremos maiores informações 
sobre isso mais tarde. 
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Se você quiser que o canal B emita ruídos brancos, e os canais C e A conforme 
acima, então o registrador 7 se altera para: 


BIT 

B7 

B6 

B5 

B4 

B3 

B2 

BI 

B0 

■ 

/ 

/ 

ruIdc 

TOM 

■ 

/ 

/ 

c 

B 

A 

c 

B 

A 


0 

0 

1 


1 

0 

1 

1 




OFF 

CN 

OFF 

ON 

OFF 

OFF 


O formato do comando SOUND para esta tabela é: 

SOUND 7.&B0010101 1, ou wn doomal, SOUND 7,13 

Você pode fazer um canal emitir ruídos e tons se você ativar ambos. Digamos 
que queira que todos os canais emitam tanto tons como ruídos; você teria: 


BIT 

B7 

B6 

B5 

B-J 

B3 

B2 

BI 



/ 

/ 

ruIdo 

TOM 


/ 

/ 

c 

B 

Bi 

C 

B 

D 


0 

0 

0 

0 

0 

0 

0 

D 




ON 

ON 

ON 

ON 

ON 

ON 


O formato do comando SOUND para esta tabela é: 
SOUND /.&BOOOOOOOO. ou, em decinai. SOUND 7,0 


Nota: Os bits B7 e B6 não são usados, e por esse motivo devem ser definidos como 0. 
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GERADOR DE TONS: OS REGISTRADORES 0, 1, 2, 3 f 4, 5 


Para definir a frequência de um gerador de tom para cada canal, você deve 
alterar os registradores 0, 1, 2, 3, 3, 4 e 5. Cada canal tem dois registradores para fixar a 
frequência do tom a ser gerado. 

Registradores 0 e 1 para o canal A. 

Registracores 2 e 3 para o canal B. 

Registradores 4 e 5 para o canal C. 


REGISTRO 

FADCA 

DESCRIÇÃO 

0 

0-255 

Ajuste fino da frequência do canal A. 

1 

0-15 

Ajuste básico da freqüência do canal A. 

2 

0-255 

Ajuste fino da freqüência do canal B. 

3 

0-15 

Ajuste básico da frrqüêucia do canal R. 

4 

0-255 

Ajuste fino da freqüência do canal C. 

5 

0-15 

Ajuste básico da Ireqüência do canal C. 

6 

0-31 

Freqüência do perador de som. 


0 intervalo de frcqücncia (f) é calculado conforme a seguir: 
t = (Registrador 0) + (Registrador 1) x 256 

Esta fórmula náo fornece a frequência em Hz, mas quanto maior a frcqüôncia 
menor é o conteúdo do registrador. 

Dessa forma, a freqüência mais alta é gerada por SOUND 0,0: SOUND 1,0 que 
fornece f = 0; e a freqüência mais baixa é fornecida por SOUND 0,255: SOUND 1,15. 

Para calcular a frequência gerada em Hz, use a seguinte fórmula: 

, I7R900 

1 "(lóxHz) 

178900 é a frcqücncia do relógio do PSG (podendo variar de modelo para modelo). 

Se você quiser ser exato sobre que freqüência quer que o PSG gere, deve fazer o 
cálculo anterior. Não! Não com uma calculadora; em vez disso use o computador: 




264 


MSX — Guia cio Programador 


10 INPUT "FREQUÊNCIA EM HERTZ" ; HZ 
20 F=INT < 1789800#/ <Í6*HZ) ) 

30 PR INT" A JUSTE FINO , REGISTROS 0,2, ou Az ";F MOD 256 
40 PRINT"AJUSTE BÁSICO , REGISTROS 1,3, ou 5= ";INT(F/25ó 
> 


O programa anterior faz o cálculo. 


Exemplo: 


Gere uma onda sonora de 2.000 Hz no canal A. 


f=1 78900/(1 6-2000)*55, 9 


10 SOUND 0,255 
20 SOUND 1.0 
30 bUUNU /,62 
10 SOUND 8, IO 


FREQÜÈNCIA DO GERADOR DE RUÍDO: 
O REGISTRADOR 6 


Para alterar a frequência do 
registrador 6 do PSG. 


gerador de ruído branco, você deve alterar o 


A faixa varia de 0 a 31 ; quanto menor o valor, maior a frequência. 


Exemplo: 


IO SOUND 7,55 

20 SOUND 8. 15 

30 FOR F=0 TO 31 

10 SOUND 6, F 

50 FOR 1=1 TO 200: NEXT 

60 NEXT F 


Você deve ouvir uma queda gradual na freqüência dos ruídos brancos gerados. 
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VOLUME: REGISTRADORES 8, 9. 10 


Os volumes dos sons emitidos pelos canais A, B e C são controlados pelos 
registradores 8, 9 e 10 respectivamente. 


Volume mínimn Volume máximo 

REGISTRADOR 8 = CANAL A 

REGISTRADOR 9 = CANAL B 

REGISTRADOR 10 = CANAL C 

Quando você coloca o valor 16 nesses registradores, o timbre 6 alterado. Isto 
significa que o volume se altera de acordo com a modulação do timbre e da frequência. O 
timbre é determinado pelos registradores 11, 12 c 13. 

Você deve sc lembrar de que o volume de saída de uma TV depende do controle 
de volume. Se o controle de volume estiver desligado, vocc não ouvirá nada. O volume do 
som do saída de áudio do MSX também depende de um amplificador externo. No caso do 
Expert existe um alto-falante interno que permite trabalhar com geração de sons até com o 
volume da TV nu mínimo. 


COMO USAR TIMBRES: REGISTRADORES 11, 12 E 13 


Quando não se usa timbre, o volume do som gerado permanece constante em um 
nível fixado pelos registadores 8, 9 e 10. Isso 6 um tanto monótono, pois tudo o que você 
ouve é um som de nível constante. Entretanto, o PSG AY- 3-89 10 tem uma facilidade de 
controle de timbre que pode alterar o volume periodicamente, de acordo com uní dos 
modos de timbre disponíveis. 

O timbre é ativado posicionando-se o controle dc volume dos registradores 8, 9 
e 10 em 16. Quando o timbre é ativado, o volume do som se altera de acordo com os 
registradores 11, 12 e 13. 
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TIMBRE DESATIVADO 


TIMBRE ATIVADO 

CANAI A, RFGISTRADOF 8 

0-15 

16 

CANAL B, REGIS T RADOR 8 

0-15 

16 

CANAL C. REGISTRADOR 8 

1 

0-15 

16 


A modulação do padrão de timbre pode ser selecionada alterando-se o 
o registrador 13 para um número entre U e 15. Entretanto, o PSG duplica alguns dos 
padrões, de modo que você consegue somente 8 timbres diferentes. 

A taxa de mudança de volume ou período do timbre pode ser alterada usando-se 
os registradores 11 e 12; o registrador 12 fornece uma alteração de período de graves c o 
registrador II, uma alteração precisa do período. 


FAIXA 


registrador 1 1 0-255 

registrador 12 0-255 


Período “ (reqislrador 12) + 256-(reglstrador 11) 

Observe que você s<5 pode ter um timbre por vez. pois todos os três canais 
usam o mesmo. 

Veja SOUND na seção de referência BASIC para mais detalhes sobre a 
modulação de timbre. 
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COMO USAR ARQUIVOS 


r 




No MSX-BASIC é possível gravar dados, bem como o conteddo de uma matriz 
string para o cassete ou para o disquete, e de forma inversa lê-los de lá. Esse conjunto dc 
dados é chamado “arquivo'*. Existe um conjunto de comandos e funções do BASIC que 
permitem que você grave c leia em uma fita cassete ou em um disquete. 


MAXFILES 


Antes de usar um arquivo 6 aconselhável aumentar o parâmetro MAXFILES, 
uma funçào usada para definir o numero máximo de arquivos abertos ao mesmo tempo. O 
valor padrão de MAXFILES é I mas não é normalmeme suficiente. O ndmero máximo 
para MAXFILES é 15. 

Falando tecnicamente, MAXFILES tem o efeito dc aumentar o tamanho do 
Bloco de Controle de Arquivos na memória. O Bloco de Controle de Arquivos é usado 
como área de trabalho pela ROM do MSX-BASIC quando você estiver usando arquivos 
(veja o mapa de memória, Capítulo 20). 


OPEN 


Para dizer ao computador que está começando a ler ou gravar arquivos, você 
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deve usar u comando OPEN para informar que um dispositivo específico está aberto. Ele 
aloca uma área dc memória auxiliar no Bloco de Controle de Arquivos e define o modo dc 
operação de entrada e saída para essa memória. 

Vucê precisa executar OPEN antes dos seguintes comandos: 

PRINT# PRINT# USING 

INPUT# UNE INPUT# 

INPUT$(#) EOF 


Sintaxe 

OPEN “cnome do dispositivo>I<nonie do arquivo>I ,, [FOR<modo>l AS#<ndmero do 

arquivov 

Existem cinco dispositivos básicos na atual versão do MSX. Eles são: 


CAS: 

Cassete 

CHT: 

Modo de tela de texto 

GRP 

Modo gráfico de leia 

LPT: 

Impressora de linha 

A: ou B: 

Unidade ce di3C0 f exrvd idsquclc) 


Dos dispositivos acima, somente CAS:, GRP: e A: (ou B:) tém uso real. CAS: é 
especificado quando vocc está usando um cassete para armazenar ou recuperar dados; 
GRP: é especificado quando vocc está tentando gravar num modo gráfico de tela; e A: ou 
B: quando você usa disquetes. Não é possível imprimir texto nos modos dc tela 2 c 3, dc 
forma que vocc tem de enviar informações para um modo gráfico como se ela fosse um 
arquivo. Uma descrição detalhada de como usar arquivos para imprimir num modo gráfico 
de tela é dada no Capítulo 14. 

Existem três modos de entrada e saída: 

OUTPUT Especfica modo de saída secüencial, slo é. grava num dispositivo usando 
PRINT# E PRINT# USING. 

INPUT Especifica modo ze entrada sequencial, isto è. lê de um dispositivo usando 
INPUT# etc. 

Especifica mode seqüenc a aopend. 


APPEND 
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< número de arquivo é um inteiro cujo valor está entre um e MAXF1LES, o 
numero máximo de arquivos. Os números de arquivos são informados dc forma que, 
quando colocados entre aspas nos comandos PRINT#, por exemplo, o computador sabe em 
que dispositivo deve ler ou gravar. O < ndmero de arquivo > é associado com o arquivo 
quando este é aberto. Ele deve ser um dos que já estejam sendo usados no programa. 

Exemplo: 


Vamos dizer que queremos abrir um arquivo de nome 1NFO em um cassete para 
gravar informações. O comando OPEN será usado assim: 

OPEN "CAS:INFO" FOR OUTPUT AS# 1 


CLOSE 


A função oposta a OPEN é executada pelo comando CLOSE. É conveniente 
fechar um arquivo assim que vocc terminar dc usá-lo. 


PRINT# 


Para gravar em vários dispositivos, usa-se um comando especial de impressão, o 
PRINT#. O sinal 6 seguido pelo ndmcro do arquivo especificado no comando OPEN. 

Quando usado com o cassete como dispositivo. PRINT# tem o efeito de gravar 
as informações fornecidas na fita cassete. 


PRINT# USING 

Esta é a versão para arquivo do comando PRINT USING e tem o mesmo efeito. 
Seu uso principal é imprimir no modo gráfico de tela e num formato especificado. 


INPUT # 


Para ler dados de dispositivos diferentes do teclado como um disquete, nós 
usamos o comando INPUT#. Ele tem o mesmo efeito que o comando INPUT, mas em vez 
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de se digitar a informação requerida a partir do teclado, ela é lida a partir do dispositivo 
especificado pelo comando OPEN; na maioria dos casos, esse dispositivo é o cassctc 
ou o disquete. 


INPUTU) 

UNE INPUT(*) 

Essas são as versões para arquivos dos comandos INPUT$ e LINE INPUT, 
respectivamente (veja INPUT*). 


EOF 


EOF produz um retomo quando sc tiver chegado ao final do arquivo. Se o final 
do arquivo for detectado, EOF retoma -1; de outra forma, é sempre 0. 


Progra/na-exemplo 

Eis um programa de demonstração que deve dar a você uma idéia de como usar 

arquivos. 

O programa requer que você digite cinco nomes e os armazene em um arquivo 
no cassctc. Então ele pergunta sc você quer recuperar os nomes. 


10 Dlh N*<5) 

20 MAXFILES=4 
30 FOR 1= i TO 5 

40 INPUT"POR FAVOR DIGITE UM NOME~;NS 
50 NEXT I 

60 PRINT"0 GRAVADOR ESTA LIGADO? CS=OK)" 

70 IF I NKEY^f > "S"AND INKEYS < >"s" THEN 70 
80 OPEN "CAS=" FOR OUTPUT AS #2 
90 FOR I=i TO 5 
100 PRINT#2,NS<I> 

110 NEXT I 
120 CLOSE #2 

130 PRINT"PRONTO PARA CARREGAR? ( S=OK ) " 

140 IF INKEYS< >"S"AND INKEYSO^s" THEN 140 
150 OPEN "CAS*" FOR INPUT AS H3 
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160 FOR I=i TO 5 
170 INPUTH3 F N% ( I ) 
í 80 NEXT I 
190 CL0SEW3 
?00 FOR I=i TO 5 
210 PRINT NS<I> 
220 NEXT I 


LINHA 10 MATRIZ PARA OS NOMFS 

LINHA 20 DEFINE O NÚMERO MÁXIMO DE ARQUIVOS COMO 5 
LINHA 30 RECEBE CINCO NOMES Ub MODO OUE POSSAMOS FA7FR 
Al GUMA COISA COM ELES 
LINHA 60 ATIVA O CASSETE (PARA GRAVAR) 

LINHA 70 ESPERA QUE O CASSETE SEJA UGADO 
LINHA 80 ABRE O ARQUIVO PARA O CASSETE 
LINNA 90 JOGA A SAÍDA PARA O CASSETE USANDO PRINT# USING 
LINHA 120 ENTÃO FECHA O ARQUIVO QUANDO TERMINA 
LINHA 130 REBOBINE O CASSETE DE MODO OUE POSSAMOS CARREGAR 
O ARQUIVO GRAVADO 

LINHA ISO ABRE O ARQUIVO PARA ENTRADA 

LINHA 160 LÊ O ARQUIVO DO CASSETE USANDO INPUT# 

LINHA 190 FECHA O ARQUIVO QUANDO TERMINA 

LINHA 200 IMPRIME OS RESULTADOS 

RUN 

POR FAVOR DIGITF Uh NOME? OS 
POR FAVOR DIGITE Uh NONE? DANI 
POR FAVOR DIGITE Uh NOME? RA 
POR FAVOR DIGITE Uh NOME? FONKS 
POR FAVOR DIGITE Uh NOME? GUIZIN 
O GRAVADOR ESTA LIGADO? <S*=OK> 

PRONTO PARA CAR REGAR? C S=OK ) 

OS 

DANI 

RA 

FONKS 

GUIZIN 
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&HFFFF 


&HF380 


ÃH8000 


&H0000 


ÁREA DE TRABALHO 
DO SISTEMA 


BLOCO DE CONTROLE 
DE ARQUIVOS 


ÁREA DE STRINGS 


PILHA 


ÁREA LIVRE 


ÁREA DE MATRIZES 


VARIÁVEIS 


ÁREA DO PROGRAMA 

BASIC 


ROM DO BASIC MSX-BASIC 


&HC000 para 
MSX com 16K 
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ÁREA DE TRABALHO 

A área de trabalho está situada entre as localizações de memória &HFFFF e 
&HF380 e é usada pela ROM do MSX-13ASIC para suas operações internas. Esta área 
contém as diversas variáveis do sistema, sendo que uma lista das mesmas é fornecida na 
seção de referência da RTOS. 


BLOCO DE CONTROLE DE ARQUIVOS 


Esta área é reservada para operações de entrada e saída usando arquivos. 
Comandos como PRINT# c INPUT# usam este bloco. 

O tamanho do bloco de controle de arquivos é alterado usando-se a função 
MAXRI.ES. 

O limite superior do bloco de controle de arquivos é &HF380. Entretanto, você 
pode diminuir esse limite para criar uma área de memória para armazenar programas em 
código de máquina e dados. Isto é feito usando-se o comando CLEAR que reduz esse 
limite. 

Exemphn: Cnar uma área de usuário para linguagem de máquina entre &HF380 e 
&HFOOO: 


CLEAR «&HF000 


&HFTFF 

&HF380 

&HF000 


ÁREA DE TRABALHO 

DO SISTEMA 

ÁREA DE CÓDIGO DE MÁQUINA 

DO USUÁRIO 

BLOCO DE CONTROLE 
DE ARQUIVOS 
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ÁREA DE STRINGS 


Esta área armazena o conteúdo das variáveis string. O tamanho padrão desta 
área é de 200 bytes. Isso define o limite máximo reservado para armazenar strings em 200 
caracteres. Entretanto, o espaço pode ser aumentado usando-se o comando CLEAR. 

Exemplo: Aumentar a área de strings para 255 bytes. 

CLEAR 255 


ÁREA DE ARMAZENAMENTO 


Ela armazena os “endereços para loops FOR/NEXT e comandos GOSUB. Ela 
armazena os endereços de onde o BASIC deve retomar em um comando NEXT ou 


RETURN. 


ÁREA LIVRE 


Esta é uma área não usada e disponível para o usuário. O seu tamanho pode ser 
visto usando o comando FREE conforme a seguir 

PRINT FREE(O) 

28615 Para sistemas MSX com 32K ou 64K. ao se ligar o computador. 

12431 Para sistemas MSX com 12K. ao se ligar o comoutador. 

Observe que o tamanho dessa área diminui à medida que você aumenta o 
tamanho do programa BASIC ou das variáveis. 
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ÁREA DIM 


Esta área armazena as variáveis de matrizes DIM e é aumentada durante a 
execução dc um comando DIM. Se uma matriz for uma matriz string, os ponteiros 
(pointers) para a área de string serão armazenados na área DIM 


ÁREA DE VARIÁVEIS 


Esta área armazena variáveis numéricas, e um ponteiro descritor de string para a 
área de strings também será armazenado aí. 

O endereço de armazenamento dc uma variável cm particular pode ser visto 
usando-se o comando VARPTR (veja VARPTR ua Parte 3, Volume 2). 
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O COMANDO USR E A 


m. 



LINGUAGEM DE MÁQUINA 


Para executar sub-rutinas em linguagem de máquina a partir dn BASIC, use o 
comando USR. O comando USR chama um programa em linguagem de máquina para a 
localização dc memória especificada no comando DEF USR. Você pode usar até 10 
rotinas em linguagem de máquina simultaneamente. Certamente, é possível ter mais dc 
de dez rotinas, redefinindo-se o comando USR 


COMO DEFINIR O COMANDO USR 


Para chamar uma rotina em linguagem de máquina, o computador deve saber o 
endereço inicial da rotina. Use o comando DEF USR para atribuir um endereço a USR. 

Exemplo: Digamos que uma rotina em linguagem de máquina sc inicia em &HFU00: 

DEF USHO=&HrOOO (você oode eliminar o 0 de modo que DEF USR = &HF000) 
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COMO EXECUTAR UMA ROTINA EM LINGUAGEM DE MÁQUINA 


O comando USR pode ser usado da mesma maneira que um comando comum. 
Isto significa que ele pode estar cm uma expressão, como abaixo: 

X = USR(99) 

YS = "M/C"=USR9f 'ahx") 

PRINT USR7(0> 

O exemplo cxccuta a sub-rotina e retoma um valor dependendo do que o 
programa em linguagem de máquina faz. Os números ou strings entre parênteses são 
parâmetros a serem passados para o programa em linguagem de máquina. Por causa disso a 
maneira como você usa o comando USR rcalmcntc depende da sua rotina cm linguagem dc 
máquina. Você pode ter um arguiiKiito nela, ou somente um parâmetro fictício; ela também 
pode retomar um parâmetro ou nada. 

Sc você quiser executar um programa em linguagem de máquina sem parâmetros 
dc entrada ou dc saída, então use uma variável fictícia: 

X = USR(O) 

onde X é uma variável fictícia e (0) é um parâmetro fictício. 


COMO PASSAR UM PARÂMETRO PARA UMA ROTINA 
EM LINGUAGEM DE MÁQUINA A PARTIR DO BASIC 


Você pode passar qualquer tipo dc parâmetro para o programa cm linguagem dc 
máquina a partir do BASIC usando o comando USR < número parâmetro ->). O 
parâmetro deve estar entre parênteses. Quando o MSX cxccuta o comando, ele verifica o 
tipo de argumento usado, isto é, se o parâmetro é um inteiro, um número de precisão 
simples ou uma string. 

Se existir um parâmetro, o programa deve informar o tipo e a localização na 
memória. O MSX-BASIC classifica o tipo de parâmetro antes que o programa em 
linguagem de máquina seja executado 
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Para descobrir o tipo de parâmetro que foi passado, examine o endereço de 
memória &HF663: 


SHF663 - 2 — 00000010 
&HF663 = 4 = 00000100 


&HF663 = 
&HF663 = 


a = 00001000 






Qarâmetro numéneo inteiro 
parâmetro numérico de precisão simples 
parâmetro numérico de precisão dupla 
stnng 


Localizaçao do parâmetro passado. 

Inteiro (&HF663 =2) - de &HF7F8 a &HF7F9 
&HF7F8 - <byte menor > 

&HF7F9 = <byte maior> 

< parâmetro mtelro>=<byte menor > +256* cbyle maior > 


Número de Precisão Simples (&HF663=4) - de &HF7F6 a ÃHF7r9 
7HF7F6 - ] valor 

7HF7F7 = ] armazenado em decimal 
7HF7F8 = ] codificado em binário 
7HF7F9 = 

Número de Precisão Dupla (&HF663=8) - de &HF7F6 a 8HF7FD 
7HF7F6 = 1 valor do parâmetro 
7HF7F7 - ) a-rnazenado en decimal 
7HF7F8 = | codificado em binário desde a posição 
7HF7F9 = ] &HF7F6 
7HF7FA = J 
7HF7FB = ] 

7HF7FC = ] 

7HF7FD = ] 

Slnng (&HF663-3) - de &HF7F8 a &HF7F9 
7HF7F8 = | 

7HF7F9 - | ... <endereço 1 > endereço do bloco de descrição ce strng 
< endereço i > = tamanhe da slring 

< endereço 1 > 4 1 = byte menos representativo do endereço 
cendereço 1 > + 2 = byte mais reoresentativo... <endorcço 2>, localização da string 
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COMO RETORNAR UM PARÂMETRO A PARTIR 
DA LINGUAGEM DE MÁQUINA 


Para retomar um parâmetro para o MSX-BASIC, defina o endereço &HF663 
com o valor apropriado de acordo com o tipo de dado e armazene os seus parâmetros nos 
endereços em questão antes de sair do programa em linguagem de máquina. O BASIC 
pega o que existir no parâmetro armazenado e transfere-o para uma variável após ter 
deixado a rotina (programa) em linguagem de máquina. 
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GERENCIAMENTO DE MEMÓRIA DO MSX 
E O MECANISMO DOS CARTUCHOS 


a» 



h 

i 


INTRODUÇÃO 


A CPU do MSX c o microprocessador Z80A, tem um bus de endereçamento de 
8 bits que pode endereçar até 64 Kbytes dc memória a qualquer tempo. Os 64K bytes de 
memória são divididos em 4 'páginas” de 16K de memória. O MSX pode expandir essa 
memória mudando para diferentes “slots” para cada página. Um ‘‘slot” é basicamente um 
espaço de memória que pode ser entendido como um banco dc memória separado. 

Fisicamente, um slot pode ser um slot de cartucho ou um banco físico dc 
memória como a ROM do MSX-RASIC ou o seu sistema RAM. 

Para selecionar o slot a ser usado com cada página, o registrador dc seleção de 
slot tem de ser definido. Veremos detalhes posteriunnenU;. 
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Normalmente, um MSX comum tem a seguinte configuração: 


PÁGINA 

SCGMCNTO 
DO SISTEMA 

SEGMENTOS 1.2. 6. 3 
CARTUCHO A CONECTAR 

Página 

3 

RAM de lôKparaos 

MSX do 16K 


Págine 

2 

RAM de 16K para os 
MSX de 32K 

HCMdeBoc 16K para 
programas do jogos 
Extensão de 16* para 
a RAM de MSX de 16K. 

Página 

1 

m 

FiMpmgwla |>ar* uma axtensáo 
do BASIC, ROM com 
o sistema operadonai de 
dsqceie para outras linguagens 

Págine 

0 

ROM de BASIC do MSX 
(DIOS) 



CARTUCHO 


Todos os computadores MSX têm pelo menos um slot de cartucho padrão de 
MSX, onde você pode conectar vários dispositivos, Eis uma lista dos possíveis 
dispositivos de cartucho: 

1. Expansão de RAM. Normalmente para expandir uma máquina dc I6K 
para 32K. 

2. Cartucho ROM com programas de jogos. O cartucho contém ou código 
dc máquina ou um programa em BASIC. 

3- Cartucho ROM de expansáo do BASIC. Esta ROM contém rotinas para 
expandir o MSX-BASIC. As rotinas são acessadas usando-se o comando 
CALL. Alguns cartuchos têm suas própnas áreas de trabalho cm RAM. 

4. Cartucho de dispositivo de entrada e saída. Esse dispositivo pode ser um 
controlador de disco flexível ou uma conexão com impressora ou um 
cartucho para caneta luminosa. Normalmente ele vem com o seu próprio 
utilitário em ROM para controlar a entrada e a saída. 
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Qualquer um dos dispositivos citados pode ser conectado a qualquer sloL O 
MSX tem um mecanismo de seleção de slots de modo que ele sabe que cartucho acessar. 


ARRANJO BÁSICO DE SLOTS 


O MSX tem quatro slots básicos, sendo o slot numero 0 o que possui a ROM do 
MSX-BASIC e é chamado slot do sistema. Cada um desses quatro slots pode ser 
expandido para 4 slots dc expansão. Dessa forma, o niímero total de slots expandfveis é 
16. Esses 16 slots podem ter todos 64K dc RAM dando a você IMbytc dc espaço dc 
memória. Isso é o máximo de RAM que o MSX pode tratar. Entretanto, você deve ter em 
mente que não se pode acessar toda a memória dc I Mbyte com o BASIC! Você precisa do 
MSX-DOS ou de programas em linguagem de máquina para lazer uso efetivo do espaço dc 
memória acima de 64K. 


Configurarão básica de slots: 


SLOT 0 SLOT 1 SLOT 2 SLOT 3 


FF*F 

coco 

BfFf 


H000 

7F-F 


4X0 

3‘FF 


PAGINA 3 


PAGINA 3 


PAGINA 3 


FAGINA 3 






PAGINA 2 


PAGINA 7 


PAGINA 2 


PAGINA 2 






PAGINO | 


PAGINA 1 


PAGINA 1 


PAG NA 1 









PAGINA I) 


PAGINA 0 


PAGINA f 


PAGINA C 


I6K 


I6IT. 


1GK 


IfiK 


0X0 
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Configuração de slot expandido: 


FFFF 

Páyi- a 3 

COOO 

BFFF 

Página 2 


fiOOO LJ 1—J 
7FFF f I 


Paqina 1 

4000 

3FFF 

Pagina 0 

0000 


SLOTO SLOT1 

EXPANDIDO EXPANDDO 

0 1 2 3 0 1 2 3 


SLOT 2 SLOT 3 

EXPANDIDO EXPANDIDO 

0 12 3 0 12 3 


J 


SELETOR DE SLOTS 


O MSX pode ter diversos slots ou bancos de memória mas, a menos que eles 
sejam controlados de alguma forma, podem interferir uns com os outros. De modo a 
classificar que slot deve ser usado para que página, o MSX tem um mecanismo especial 
para selecionar slots. 

A qualquer tempo, a CPU pode acessar os 64K ou as 4 páginas de RAM. 
Essas 4 páginas podem estar, cada uma, em slots diferentes. As páginas nos slots são 
selecionadas usando a porta A de saída de 8 bits do PPI 8255 (veja o circuito selecionador 
de slots na próxima página). 

PA0 e PAI tomecem o númerc de slot para a página 0. 

PA2 e PA3 fornecem o número de Slot para a página 1. 

PA3 e PA4 fornecem o número de slot para a página ?. 

PA5 c PA6 fornecem o número de slot para a página 3. 
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O sinaJ do PPI é enviado para o selecionador de slot 74LS153. Esse chip 
também recebe sinais da CPU Z80 para a página atual da qual a CPU esta lendo e para a 
qual está gravando. 


Sinal Al 5 Sinal A14: 

0 0 

0 1 

1 0 

1 1 


O número da página que a CPU 
está lendo ou gravando 

página 0 
página 1 
págna 2 
página 3 


O número de slot selecionado é então passado no decodificador 2 para 4, 
74LS139, que fomccc o sinal de slot selecionado, SLTSL, para o slot relacionado das 
4 páginas. 


DIAGRAMA DO CIRCUITO SELECIONADOR DF Sl OT 



SINAL DE 
SELEÇÀO OF 
SLOT 

SLTSLO 

— SLTSL 1 

— SLTSL2 
— ' SLTSL3 
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COMO SELECIONAR E ATIVAR UM SLOT 


Para selecionar slots para cada página com um software, faça a saída para o 
endereço &HA8, que é a saída para a porta A do PPT. 

O valor a ser saído é um número dc 8 bits. 


tíit N ? 


76 


b4 


32 


10 



número de slct da página 0 
númoro dc slct da oágma 1 
núne '0 de slot da nágma 2 
número de slot da página 3 


Exemplo: 


Digamos que vocé quer usar o slot 0 para as páginas 0, 1 e 3 e o slot 1 para 
a página 2. 

Bit N? 7 6 5 4 3 2 1 0 

000 10000 = 16 

Você deve enviar 16 para a porta de entrada e saída &HA8. Entretanto, é melhor usar a 
chamada da BIOS ENASLT (&H0024) a partir do código de máquina. 


EXPANSÃO DE SLOTS 


O MSX tem a opção de até 4 slot s básicos, dc U a 3. Nem todos eles são 
fornecidos com todas as máquinas, mas cada slot pode ser expandido usando-se o kit de 
expansão. Dessa forma, o número máximo dc slots é 16. Como todos eles podem receber 
até 64K de RAM, a memória RAM máxima que o MSX pode ter é IMbytes. 

Esses slots de expansão não podem ser expandidos dc qualquer maneira. Eles 
sáo sempre expandidos a partir de um slot básico, de modo que não tem sentido conectar 
um kit de expansão em um slot já expandido. 
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Para selecionar um slot de expansão, você primeiro deve selecionar o Slot 
básico, usando a porta A do PP1 8255. O registro selecionador de slots está na localização 
&HFFFF no slot expandido. Isto determina se a página selecionada nesse slut está sendo 
usada ou não. 

Para descobrir se um slot básico tem uni kit de expansão conectado ou não, 
coloque no endereço &HFFFF o valor &H0F (POKE &HFFF, &H0F). Se você então ler o 
endereço &HFFFF (PRINT PEEK (&HFFFF)) e obtiver um complemento do que você 
gravou, isso significa que existe um kit de expansão aí. 


PROCEDIMENTO DE PESQUISA DE RAM 


Quando o computador MSX é ligado, ele pesquisa todos os slots para selecionar 
a RAM do sistema: 

1. Ele primeiro pesquisa pela RAM disponível na página 2, dc a 

&ÍIBFFF e então ativa o slot com a RAM maior da página 2. Se existir mais 
de um slot com o mesmo espaço de memória, então o slot com o menor 
niímcro dc slot 6 selecionado. 

2. Logo. ele repete o mesmo processo para a página 3, dc &HCOOO a &HFFFF. 
Outra vez, a maior RAM disponível com o menor numero de slot é 
selecionada. 

3. Por último ele verifica se a RAM é contínua de &H8000 a &HFFFF e 
posiciona na variável BOTTOM do sistema (&HFC48) o endereço da menor 
RAM disponível. 
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EXPANSÃO DE 16K PARA 32K 


FFFF 

cnoo 

BFFT 


60CO 

7FFF 


4000 

3=FF 


0C00 


SLOTSDO CARTJCHOS 
SISTEMA 


RAM 
de 16 K 






RAM 
de 16 K 


ROM 
dei MSX 




ROM 
de MSX 




PÁ GINA 3 
PÀÜiNA 2 

dOI IOW = &H8CG0 
PÁGINA 1 

PÁGINA 0 


CARTUCHOS DE ROM COM PROGRAMAS 


Procedimento de Pesquisa da ROM 

Tendo selecionado a RAM do sistema, o MSX então pesquisa os cartuchos de 
ROM de &I 14000 a &HBFFF. página 1 e página 2. Ele pesquisa por um ID (identificador) 
válido no início de cada página a partir do slot 0 até o slot 3, e os slots de expansão 
quando expandidos. 

A área de ID está localizada no início da página seguinte e pode ter um dos se- 
guintes formatos: 
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+ &HOO ID-AB' 


\ 6H02 INIT 


+ &H04 | COMANDO 


+ &H06 


&H08 


DISPOSITIVO 



ID... 

LNIT ... 

COMANDO ... 
DISPOSITIVO ... 
TEXTO ... 


2 bytes código ‘AB’ para indicar que existe uir 
cartucho de ROM aí. 

contém o endereço da rotina de inicialização 
para esse cartucho. 

contém o endereço do gerenciador de coman- 
dos expandido. 

contém o endereço do gerenciador de disposi- 
tivo expandido. 

contém o endereço inicial do programa BA- 
SIC contido nesse cartucho. 


Nota: ID, INIT, COMANDO, DISPOSITIVO e TEXTO irão conter zeros se 
não forem aplicáveis. 


O MSX- BASIC toma as seguintes ações para o procedimento de pesquisa: 

1. Verifica a área de ID e descobre que tipo de rotina tem. Ele então passa a 
informação coletada para a área dc trahalho relacionada. 

2. Executa a rotina INIT, sc existir. 

3. Executa o programa BASIC desse cartucho, se existir. 


Nota: COMANDO e DISPOSITIVO não são executados nesse ponto porque 
eles somente são usados quando o usuário solicita um comando ou dispositivo de 
expansão. 


INIT: Rotina de Inicializaçao 

INIT contém o endereço da rotina dc inicialização específica para o cartucho, 
□a normalmente inicializa os dispositivos de entrada e saída conectados a esse cartucho 
ou posiciona uma conexão (hook) (veja mais a respeito na seção de Conexão Hook), ou 
reserva uma área de trabalho para o software do cartucho. 

A rotina de inicialização pode alterar todos os registros exceto o ponteiro de 
pilha (stack pointer). Ele retorna para o BASIC usando o comando do Z80 RET> 
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O INIT não precisa scr uma rotina de inicialização. Ele pode ser um programa 
em código de máquina a ser executado imediatamente após ligar o computador. Pode ser 
um jogo. 

Se não existir rotina de inicialização, então INIT contém zeros. 


TEXT: O Programa BASIC 

Um cartucho de ROM não precisa ter necessariamente um programa em código 
dc máquina: ele pode ser escrito em B ASIC. TEXT contém o endereço inicial do programa 
BASIC contido nesse cartucho. 

Quando se programa um software de cartucho em BASIC, as seguintes normas 
devem ser lembradas: 

1. Quando existir mais de um cartucho com software BASIC conectado, a 
máquina irá executar somente aquele do slot com o menor nilmero. 

2. O programa BASIC do cartucho está armazenado no formato “tokens". 

3. O cartucho deve scr colocado na página 2. &H8000 a &HBFFF. Isto 
significa que a memória máxima do BASIC é 16K. 

4 . Uma RAM que esteja colocada na página 2 de qualquer outro slot será 
desativada e dessa forma não poderá ser usada a partir do programa BASIC 
em cartucho. 

5. O endereço apontado pela entrada TEXT deve conter um 0. 

6. Os nií meros de linhas para GOTO, GOSUtí etc., devem ser alterados para 
ponteiros, para obter-se uma execução mais rápida. 

Se não existir programa BASIC no cartucho, então TEXT contém zeros. 


COMANDO (Statement): Rotina de comando expandido 

Usando o comando CALL no BASIC do MSX, você pode usar comandos 
expandidos chamados de fora da ROM do BASIC do MSX. Um cartucho contendo um 
comando BASIC expandido deve conter o endereço inicial da primeira rotina de comando 
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expandido cm STATEMENT. O cartucho deve ser colocado na página 1, mas pode ser 
qualquer slot, exceto o do sistema onde reside o BASIC. 

A sintaxe para o comando expandido é: 

CALL <nome do conando> 

CALL <nome do comando > (argumentos) 

CALL pode ser abreviado pelo caractere sublinhado 4 \ 

Quando o BASIC encontra um comando CALL, ele armazena o nome do 
comando na área de trabalho do sistema, PROCNM. PROCNM está localizado em 
&HFD89 e tem 16 bytes de tamanho. O nome do comando termina com um zero quando 
está armazenado cm PROCNM, dc modo que o tamanho máximo de um comando 
expandido é 15 caracteres. 

Antes do comando expandido ser executado, o ponteiro de texto, o registro HL, 
aponta para o endereço após o nome do comando. 

O procedimento de comando do cartucho então verifica o conteúdo de 
PROCNM e executa a rotina que coincida com o nome do comando. 

Após ele ter executado o comando expandido, o flag de execução é limpo e o 
ponteiro dc texto (HL) é apontado para a posição do comando seguinte. 

Se não existir comando expandido que coincida com o nome em PROCNM, 
então o flag de execução c o ponteiro de texto permanecerão como estão, e retomarão para 
o BASIC com a mensagem ‘‘Syntax Error" (Erro de Sintaxe). 

Se não existir rotina de comando expandido no cartucho, então STATEMENT 
contém zeros. 


DEVI CE: Rotina de Tratamento do Dispositivo de Expansão 

O MSX-BASIC tem a habilidade de se conectar com uma expansão de 
dispositivo de entrada e sakla para um slot de cartucho. DEV1CE contém o endereço 
inicial da rotina de gerenciamento de dispositivo. 

As seguintes notas devem ser lembradas accrca da rotina DEVICE. 

1. O cartucho deve ser colocado na página 1, &H4000-&HBFFF. 
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2. Um cartucho ( 16K) pode ter até 4 dispositivos lógicos conectados. 

3. O nome do dispositivo é armazenado na área de sistema PROCNM, da 
mesma forma que com STATEMENT. PROCNM está localizado de 
&HFD89 em diante e tem 16 bytes de comprimento. O nume do dispositivo 
termina com um zero quando armazenado em PROCNM, de modo que o 
tamanho máximo de um comando expandido é de 15 caracteres. 

4. Quando o BASIC encontra um nome de dispositivo, em um comando OPEN 
ou em outros, que já conhecido pela ROM do MSX, então de chama a 
entrada do dispositivo com &HFF no registrador A. Se não existir 
gerenciador que coincida com o nome do dispositivo, o flag de execução será 
posicionado. Se existir um dispositivo, ID (de 1 a 3) deve ser retomado no 
registrador A e o flag de execução será reposicionado. Todos os 
registradores podem ser alterados na rotina de dispositivo. 

5. Uma operação real de entrada e saída é executada quando a entrada DE VICE 
é feita com um dos seguintes valores no registrador A: 


0 Open 
2 CIusü 

4 Entrado c saída aleatória 
6 Raída sequencial 
8 Entrada sequencial 
10 Função LOC 
12 Função LOr 
14 Função EOF 
1b Função FPOS 

18 Caractere de Cópia de Segurança 


A variável do sistema, DEVICE, deve ser posicionada para ntimero dc 
Dispositivo ID (0-3). 

Se não existir rotina de DEVICE no cartucho, então DEVICE deve conter 

zeros. 
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DESCRIÇÕES DAS VARIÁVEIS DO SISTEMA 
RELACIONADAS COM O MECANISMO DE SLOT 


Status de cada Slol 

EXPTBL - Indica qual slol está expandido. 

Localizarão &HFCC1 - 4 bytes de comprimento. 

EXPTBL SHFCC1 para o Slot 0 
&HFCC2 para o Slot 1 
&HFCC3 para o Slot 2 
SHFCC4 para o slot 3 
&H80 mdica siot expandido 
ÜHOO nào exoanddo 

SLTTBL - Indica que valor está saindo para o registro selctor de slot dc 

expansão. Isto 6 válido somente quando o EXPTBL contém 
&IC80, isto é, quando o slot é expandido. 

Localização &HFFC5 - 4 bytes de comprimento. 

SLTTBL &HFCC5 para o slot 0 
&HFCC6 para o slot 1 
&HFCC7 para o slot 2 
&HFCC8 para o slot 3 


Status de cada Página 

SLTATR -Contém o que está em cada página para todas as páginas 

possíveis. 

Localização &HFCC9 - 64 bytes dc comprimento. 

SLTATR &HFCC9 para o slot básico 0. O slol 0 de expansão página 0. 

&HFCCA para o sbt básico 0. O slot 0 de expansão página 1 . 

••• 

&HFD07 para o Slot básico 3. O slot 3 de expansão página 2. 

&HFD08 para o slot básico 3. O slot 3 de expansão página 3. 
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Bit N? 


7 6 5 4 3 2 10 



Não usado 

Expansor de comando quando - 1 
txpansordc dispositivo quando - 1 
Texto BASIC dentro quando = 1 


SLTWRK - área de trahalho para cada página. O uso depende do que existir 

na página. São usados dois bytes por página. 

Localização &HFD09 - 128 bytes de comprimento; 2 bytes por página. 

SLTWRK &HFD09 para o Slot básico 0. O slut 0 de expansão oágina 0. 

üHFDOA para o Slot básico 0. C Slot 0 de expansão página 0. 

AHFD0B para o slot básico 0. 0 Slot 0 de expansao página 1 . 

&HFD0C para o slot básico 0. O slot 0 de expansão página 1 . 


&HFD85 para o Slot básico 3. O slut 3 de expansão página 2. 
AHFD85 para o slot básico 3. O slot 3 de expansão página 2. 
&HFD87 para o slot básico 3. O slot 3 de expansão página 3. 
&HFD88 para 0 Slot básico 3. O slot 3 de expansão página 3. 


CAPÍTULO 51 


PERIFÉRICOS 



CASSETE 

Os comandos seguintes estão associados com o uso dc um cassete (descrições 
detalhadas são fornecidas no Ijvro de referência do BASIC). 

CLOAD 

CSAVE 

MOTOR 

SAVE 

LOAD 

BSAVE 

BLOAD 


Conector: conector ÜIN de 8 pinos, t po 45326. 


Tabela de sinais 


N* 

SINAL 

SENTIDO 

1 

GND 


2 

GND 


3 

GND 


4 

CMTOUT 

SAÍDA 

5 

CMTIN 

ENTRADA 

6 

REM+ 

SAÍDA 

7 

REM- 

SAÍDA 

8 

GNU 
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IMPRESSORA 


Se o seu computador MSX estiver equipado com uma interface (conexão) de 
impressora, então você pode usar qualquer tipo dc impressora que pertença ao padrão 
Centronics. Se o seu computador não tiver uma conexão de impressora embutida, então 
você deve comprar um cartucho dc conexão de impressora que se conecte no slot de 
cartucho. 

Algumas impressoras são equipadas com um conjunto de caracteres padrão do 
MSX. Essas impressoras compatíveis com o MSX são fabricadas por alguns fabricantes e 
dão a você a vantagem de ser capaz de imprimir todos os caracteres gráficos do MSX. 
Uma impressora não compatível com o MSX não será capaz de imprimir os caracteres 
gráficos; em vez disso, ela colocará um espaço para cada caractere gráfico. 

Se você está usando uma impressora compatível com o MSX, então você deve 
dizer isso ao computador usando o comando SCREEN. 

SCREEN.,,,0 seleciona una impressora MSX 

SCREEN,,. .1 seleciona uma impressora nao MSX 


LPRINT 
LPRINT USING 

Para imprimir com uma impressora, você deve usar os comandos LPRINT c 
LPRINT USING, em vez dc PRINT c PRINT USING. As suas funções são virtualmente 
as mesmas, exceto que LPRINT e LPRINT USING não irão fornecer qualquer exibição no 
modo de tela. Se você quiser que qualquer coisa seja impressa no modo dc tela c 
na impressora ao mesmo tempo, vocc deve usar PRINT e LPRINT no seu programa. 

LLIST lista o programa na impressora. Sua sintaxe é a mesma do comando 

LIST. 

A função LPOS retoma a posição do cabeçote da impressora, e é análoga à 
função POS, que fornece a posição do cursor no modo de tela de texto. 

Serão fornecidos maiores detalhes sobre impressoras quando você comprar a 
sua. Invariavelmente, o manual irá incluir programas de demonstração, escritos no BASIC 
da Microsoft que é compatível com o MSX-BASIC. 
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Conector: Tipo Centronics, 14 pinos Aphenol. 


PINO N- 

NOME DO SINAL 

1 

PSTB 

? 

PHRO 

3 

PDB1 

4 

PDD2 

5 

PDB3 

6 

PDB4 

7 

PDB5 

8 

PDB6 

9 

PDB7 

10 

NC (sem função) 

11 

BUSY 

12 

NC (sen função) 

13 

NC (sen função) 

14 

GND 



PORTA DO JOYSTICK 


A maioria dos computadores MSX tem duas portas para joystick, enquanto 
outros tem somente uma; o BASIC pode suportar até duas. Tirando os joysticks, você 
pode conectar outros dispositivos como pads e paddles de jogos. 

Conector AMP de 9 pinos. 


Joystick 


Joystick são usados principal mente em jogos. .Se o seu computador tiver duas 
portas para joystick, mas você tiver somente um, assegure-se de cunectá-lu na porta 
JOYSTICK 1, pois a maioria dos programas comerciais assumem que quando vocc está 
usando somente um, ele está conectado nessa porta. 

Para ler o status do joystick a partir do BASIC, use os comandos STICK e 
STRIG. STICK retoma em que direi, áu está o joystick, e STRIG diz a você o status do 
botáo de disparo do joystick. 
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O comando ON STRIG GOSUB fornece a você um intemiptor de disparo. Veja 
a seção Manuseio de Eventos e Interrupções. 


Paddle de Jogos 

Você pode conectar até 12 paddles de jogos, 6 em cada porta de joystick. O 
status do paddle pode ser lido usando a função PDL (veja PDL). 


Pad de Toque 


Você pode conectar um pad de toque por porta de joystick. 

PAD retoma o status do pad de toque (veja a seção de referencia PAD no 

BASIC). 


SINAL 

DIREÇÃO 

1 

FWD 

ENTRADA 

2 

BACK 

ENTRADA 

3 

LEFT 

ENTRADA 

4 

RIGTH 

FNTRADA 

5 

+5V 

••• 

r. 

TRG 1 

ENTRADA 

7 

TRG2 

ENTRADA 

8 

SAÍDA 

SAIDA 

9 

GND 

... 



PORTA DO CARTUCHO 


Lista dos Pinos de Sinal 




ÍNDICE ANALÍTICO 



? Abreviarão dc PRINT. 15,17,31 

< > Diferente dc, 25, 155 
/ Divisão. 18. 153 

a Exponencial, 18, 84-85, 153 
= Igual á, 19, 155 
» Juntando strings, 65 
> Maior que, 25, 155 
>= Maior que ou igual, 25, 155 

< Menor que, 25, 155 

< - Menor que ou igual. 25. 155 

* Multiplicarão, 18, 154 
( ) Ordem de cálculo, 18 

&B Prefixo hinário, 142, 157 
&1I Prefixo hexadecimal, 142, 161 
<SO Prefixo octal. 142, 159 

; Separador de múltiplos comandos, TO 
+ Soma, 9, 18, 154 

# Sufixo dupla precisão, 144 
! Sufixo precisão simples, 144 
$ Sufixo string variável, 144 

% Sufixo variável inteira, 20, 144 
-Subtração, 18, 113 

. Utilizado em comandos musicais, 476 
, Utilizado cm declarações INPUT, 27 
," " Utilizado em declarações PRINT, 8-9 
; Utilizado na declaração INPUT, 26 
; Utilizado na declaração PRINT, 10. 23 


A 

AS, 42 

A comando (gráfico), 115 
ABS, 71, 304 

Abrir arquivos, 267-268. 462 
Álgebra Boolcana I. 167-178 
Álgebra Booleana II, 179-185 
Alimentação de linha, 140 
Altura (som), 265 
AND. 27. 167-169, 305 
Anunaçáo, sprite, 247-248 
APPEND, 268 
Arco- tangente, 310 

Arcos, 90 

Arcos, desenhos, 1 1 1 
Arcsdn, 89 
Arctan, 89 
Arquivos, 267-271 
abrindo, 462 
fechando, 289 
fim de, 367 
número máximo, 433 
Avaliação aritmética, 18-19 
ASC; 91. 308 
ATN, 84,310 
AUTO, 29, 136-138,312 
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B 

BANCO, 62 

BEEP (chamada BIOS), 315, 587 
BIN$, 3 16 
BLOAD, 214, 31 8 
BREAK na linha dc mensagem, 5, 32 
break in, 32 
BREAKX, 585 
BASE, 314 
BSAVE, 217-320 
Byte, 146 


c 

CALA TR, 622 
CALBAS, 577 
CALL, 281.290.321 
CALLF, 569 
CAI PAT, 522 
CALSLT. 573 

Cancelamento de linha, 16, 139 
Cancelamento linhas de programação, 16, 29, 
135, 355 

Cancelando matnzcs com EKASE, 61, 370 
Cancelando programas, 16- 17, 29-30, 440 
Caracteres de cancelamento, 5-6, 30, 135 
Caracteres e códigos ASCII, 91-93, 324 
Caracteres europeus. 5 
Caracteres gráficos, 5, 87 
Caracteres gráficos, compatibilidade com 
impressora, 230 
Caracteres gregos, 5 
Carregando programas BASIC, 47-49, 
213-214,301.426.312 
Carregando programas c dados em linguagem 
de máquina, 318 
CAS, 215, 268,462 
CDBL. 150-151.322 
Chaves e códigos de controle, 92-93, 135 
CHGCAP, 591 
CHGCI.R, 615 
CHGET. 579 
CHGMOD, 615 


ClICiRAM, 498 
CHKRAM, 565 
CHPUT, 579 
CHRS, 37, 324-325 
CHRGTR, 567 
CHSNS, 578 
CINT, 15(1, 325 
CIRCLE, 110-111,221,327 
Círculos, pintando, 122. 470 
CKCNTC, 586 
Classificação dupla, 59-61 
Classificando, bolhas, 59-61 
CLEAR variáveis de memória, 33, 147, 273, 
330 

CLOAD, 48. 213, 331 
CLOAD?, 48, 213, 331 
CLOSE, 333 
CLRSPR, 616 
CLS, 16. 224-225, 334 
CLS (chamada BIOS). 588 
CNVCHR, 582 

Código ASCII, conversão de caracter para, 
308 

Colocando formas gráficas em escala, 120 
COLOR; 36-37, 98-100, 336 
Comando C (gráfico), 1 19 
Comando certo (gráfico), 1 15 
Comando D (gráfico), 115 
Comando de ângulo (gráfico), 1 17 
Comando dc cnvoltóna (música l, 1 32 
Comando de modulação (música), 131-132 

Comando dc oitava (música), 127 
Comando de repouso (música), 1 29 
Comando de volume (música), 129- 130 
Comando diagonal (gráficos), 1 16 
Comando F. (gráfico), 1 16 
Comando F (gráfico), 16 
Comando G (gráfico), 1 1 6 
Comando H (gráfico), 1 1G 
Comando L (gráfico), 1 15 
Comando L (música), 128, 475 
Comando M (gráfico), 1 17 
Comando M (música), 132, 476 
Comando N (múica). 129. 476 
Comando nota (música), 129 
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Comando O (musica), 127 
Comando para baixo (gráfico), 1 15 
Comando para esquerda (gráfico), 115 
Comando R (gráfico), 1 1 5 
Comando R (musicai, 129, 476 
Comando S (gráfico I, 1 19 
Comando S (música), 132, 476 
Comando T (música), 129-130, 476 
Comando lempo (música), 129- 1 30 
Comando U (gráfico), 1 15 
Comando Up (gráfico), 1 15 
Comando V (música), 1 30, 476 
Comando X (grafico), 120 
Comandos de escala (gráfico), 1 19 
Comparação, string, 181-182 
numérica, 180 

Comprimento de string, 74, 414 
Concatcnação. veja sinal de mais. 66 
Conxão de cartucho 
arranjo, 2RO-281 
dispositivos, 28 1 
expansáo, 285 

pontos de entrada RIOS, 571 -577 
seleção, 2R5 
seletor, 283-284 
software ROM, 287 
variáveis dc sistema, 291 
veja também cartucho ROM 
Console, ponto de entrada BIOS, 578-594 
Constante precisão dupla 
exponencial . 142-143 
Constantes, string, 141 
Constante de precisão simples e exponencial, 
142-143 

Constante, numérica, 141-142, 144-145 
Constantes de ponto fixo, 142 
Constantes de ponto flutuante, 142 
CONTinuando execução dc programa. 17, 
31-33,337 

Conversão binária para decimal, 157-158 
Conversão de caracteres para ASCII, 308 
Conversão dc tipo, 322. 325, 148-152, 534 
Conversão decimal para binário, 157- 159, 316 
Conversão decimal para hexadecimal, 162 
Conversão decimal para octal, 160 


Conversão do decimal/hexadecimal para octal, 
444 

Conversão do octal para decimal, 160 
Cor 

alterando, 98-100 

círculos. 1 10 
comando gráfico C, 1 19 
dc contorno, 98-99, 1 23- 1 24, 220 
dc fundo, 98-99, 22U, 222 
de primeiro plano, 98-99, 102, 123, 220 
default, 95, 99 
elipses, 1 12 
formas, 122 
linhas. 106-107,416 
modo gráfico, 226-229 
modo tela, 441-442 
números de código, 98 
pintando com PAINT, 122-125 
ponto, 101-104, 476, 478,492 
quadriláteros, 109 
sprite6, 244 
COSeno, 84-87, 339 
CRT, 230, 269, 463 
CSAVE, 49,213.341 
CSNG, 150-151,342 
CSRLIN, 221-222, 343 
Cursor, 4 

desativar e ativar, 40-41, 427 
pusiçãn, 343, 4R1 

posicionamento. 6. 40-41, 139, 140, 427 


DATA. 54-57, 344 
DCOMPR, 568 

Declaração para limpar tela, 334 
DEF FN, 77, 348 
DEF USR.276. 353 
DEFDBL, 145, 347 
DEFINT. 145. 350 
DEFSNG, 145, 351 
DFFSTR , 144. 352 
DELETE. 30, 139-140, 354 
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Depurando, seguindo um programa em 
execução, 30-31, 548 
Dcsl riços do teclado, 3-6, 140 
Desenho e coloração de quadriláteros, 
108-109.416 
Desenhos, veja formas 
Desviando, 82-83 
DIM. 144.275.356 

matrizes mui timensionais, 61-62 
matrizes unidimensionais, 51-57 
DISSCR, 607 
D is play de vídeo 
fio de ligação, 33 
liberação dc, 4, 140, 334 
ponto de entrada BIOS, 578, 94 
veja também tela 

Dispositivos periféricos, 294-298 

Dl V, 154-155 

DOWNC, 632 

DRAW, 357 

DSPFNK, 590 

Duração de comando (música). 1 29- 1 30 

E 

Edição dc linha, 5-6 

Elevado a potência dc. 18- 19 

Elipses, desenhando, 112-113, 327 

Elipses, pintando cuni PAINT, 122-125, 470 

EUSE, 26, 179, 364 

ENASCR, 608 

ENASLT, 574 

END, 31, 366 

Endereços BASE cm RAM dc vídeo, 258, 314 

Engodos, 638-6-12 

Envoltórias (som), 265-266 

EOF, 270, 367 

EQV, 172-173, 368 

ERAFNK, 589 

ER ASE, 61, 370 

EKL, 204, 205, 371 

ERR, 205, 373 

ERROR, 205-212, 375 

Escrevendo c lendo, cassette, 267-271 

Espaços, múltiplos, impressão de, 42, 512 


EXP. 89, 301,377 
Exponenciais, 18. 84, 377 


Fechando arquivos com CLOSE, 230, 268, 
333 

FETCHC. 626 
FILVRM, 613 
FIX, 71, 378 
FNKSB.5R9 

FOR...NEXT, 21, 274, 380 
FOR. ..TO aninhado, 21-23, 380 
Forma exponencial D, 142 
Forma exponencial E. 142 
Formas 

de onda (som), 260 
desenhando, 110-114 
pintando. 125-128,470 
veia também retângulos, círculos, elipses, 
paralelogramos, triângulos 
Formato ASCII, cossctc, 214, 308 
FOUND, 4 1,48-49 
FRE, 33, 274, 382 

Frerjíiência de baud, salvando em cassete, 214 
Funções. 70-76 

aritméticas, 125,77 
definindo, 77-79 
matemática, 84-90 
trigonométrica. 85-90 


G 

Gatilho, veja joystick 

GETYPR, 568 
GICINI, 604 

GOSUB, 80-81, 83, 274, 383 
GOTO, 25, 81, 385 
Gráficos 

alta resolução. 95, 219, 225 
baixa resolução, 96-97 
círculos c elipses, 1 10- 1 14, 327 
colocando pontos, 101- 104 
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escalas, 122, 360 

formas. 108-114 
linguagem macro, 115-12 1, 360 
linhas, 105-107,416 
modos de tela 2 e 3, 95-97. 220. 223-224 
pintando, 122-125 
pintando na tela, 232-234 
processador de display de vídeo, 251-256 
retângulos, 108- 109 
rotação, 117-118, 360 
traçando desenhos e formas, 115- 121, 358 
veja também cor, sprites 
Gravador cassete 
conector, 47, 294 
operação, 47-50, 439 

salvando e carregando/cscrcvcndo c lendo, 
47-50.213-218.267-271 
Gravador de fita. veja gravador cassete 
GRP, 268, 463 
GRPPRT, 623 
GSPS1Z, 623 
GTASPC, 635 
GTPAD, 597 
GTPDL, 598 
UTSTCK, 595 
GTTRIG, 596 


H 

HEX$, 161,387 
Hexadecimal, 142, 161-162. 387 


I 

IF...THEN, 25-27, 8 1 , 1 79- 1 85, 388 
1F...THEN aranhado, 184-185, 388 
IMP, 173-175,391 

Impressora 

compatibilidade MSX, 295-296 
declarações de saída, 295-296 
listando para, 422 
posição do cabeçalho, 430 


saindo para, 43 1 
tabela dc conexão. 295-296 
Indicação OK, 8, 14-15 
INTERVAI. ON7 OFF/STOP, 192-196, 405 
1N1GRP, 618 
1NIMLT, 618 
INIT32. 288-289. 617 
1NITXT, 616 
1NKEYS, 44, 392 
INLIN, 584 
1NP, 394 

1NPUT, 13. 26.44, 395 
1NPUTS, 44, 270, 399 
INPUTS (#), 268-269,400 
1NPUT#, 268, 269. 398 
1NSTK, 65-67, 402 
Instruções RST, 565-570 
Instruções RST do BIOS; 565-570 
INTeiros, 19, 70.71,403 
constantes, 141 
conversão, 141, 322 
divisão, 154 
variáveis, 19, 143-145 
Interface cassete, ponto de entrada BIOS 
para, 595-598 
Interface Centronics, 295 
Interrupção dc intervalo dc tempo, 192-194, 
405 

dc tecla dc função, 194- 196 
1SCNTC, 585 
ISFLIO, 592 


J 

Joystick. 296. 297 

acionamcnto/dcsativação do gatilho. 536 
direção de, 529 
interrupção, 198-200 
intemipçãu do gatilho, 459 
portas do, 296 
s tatus do gatilho, 535 
tabela de conectores, 296 
Juntando programas BASIC, 214. 422 
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K 

KEY. 35. 407 

KEY( ) ON/OFF/STOP, 194, 41 1 
KEY LIST, 35, 409 
KEY ON/OFF. 35.39.410 
KEYINT, 570 
KILBUF, 594 


L 

Laços Ooop). 21-24 
Largura da tela. 39, 492 
LDIRMV, 614 
LÜIRV.M, 615 
LEFT$, 67-68.413 
LEFTC, 630 

Lcidc De Morgan, 177, 183 
Leis 

associativas, 177 
comutativas, 177 
de rearranjo. 177-178 
distributivas. 178 
LEN, 74,414 

Lendo c escrevendo, cassete, 267-27 1 
LET, 10-13.415 

Letras minúsculas em B AS IC, 4, 1 1 , 27, 29 
LINE, 105-109, 221,416 
LINEINPUT, 44-45, 419 
LINE INPUI'#,26H, 421 
Linguagem macrorausical, 126-132, 475-476 
Linhas, traçado e coloração, 105-107, 416 
LIST, 209-210 

LISTando programas. 16, 29, 135-136. 422 
LLIST, 295, 366 

Localizar (LOCATE), posição do cursor, 38, 
426 

LOAD, 214-215. 425 

LOG, 84,90,429 

LOOPS, 21-24 

LHOS, 295, 430 

LPRINT, 295,431 

LPRINT USING, 191, 295, 432 

LPT, 268, 462 


LPTOUT, 580 
LPTSTT, 581 


M 

Manipulador de toque, 296 
Manipuladores para jogo. 296 
Manuseio de erros, 503, 201-212 
Manuseio de eventos, 192-200 
Manuseio de interrupções, 192-200 
MAPXYC, 625 
Matnzes, 145- 146 

cancelamento. 61, 37U 
dimensão simples, 52-53, 356 
Multidimensional, 62-63, 356 
MAXFILES, 267, 433 
Memória 

administração de, 280-293 
liberando c reservando, 329 
mapa de, 272-275 
PEEK na, 474 
POKE na. 480 

posição e utilização dc.vanávcis, 146- 147 
quantidade livre, 32-33 
veja lanibém RAM 

Mensagem de erro. de sistema, 201 -204 
Mensagem de erro, sob medida. 1 10- 1 12. 377 
Mensagem redo from start', 396 
Mensagens extra- ignoradas, 397 
MERGE. 434 
MIDS, 67-69, 436 
Mixe (som), 222 

Modo comando, 8- 1 3 
MODuio aritmético, 154, 438 
MOTOR, 49.213,439 
MOTOR OFF, 49 
MOTOR ON, 49 
Música, veja som 


N 

NEW, 37, 440 
NE XT, 21,441 
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NOT, 168, 442 
NSETCX, 634 
NUM, 52 
NU MS. 53 

Numeração de tinha, 14 
Numeração de tinha AUTO, 29, 136-137, 312 
Numeração dc linha, automático, 29. 136-137, 
312 

Número da linha de erro, 371 
Número de código errado, 373 
Números 

binários, 142, 156-157 
comparação, 177-178 
constantes, 141-142 
conversão de tipo, 71-72, 148-152 
conversão em string, 72. 534 
negativo, conversão de sinal, 71 
randômico, 73-74 
sinal de, 71 
variáveis, 143-145 

variáveis, posições de memória e utili ração, 
146-147 


O 

OCT$, 159, 444 
Octal, 142, 159-161 
ON...GOSUB. 83. 445 
ON...GOTO, 83. 447 
ON ERROR GOSUB. 192. 449 
ON ERROR GOTO, 205-207, 449 
ON INTERVAL GOSUB, 192,451 
ON KEY GOSUB. 192,453 
ON SPRITE GOSUB, 192, 455 
ON STOP GOSUB, 192, 457 
ON STRIG GOSUB, 192, 459 
OPEN.462 
Operadores 

aritméticos, 153 

lógicos, 168. 178 
relacionais, 155 
OR, 27, 169-170, 465 
OUT, 467 
OUTDLP. 593 


OUTDO, 567 
OUTPUT, 268 


P 

PA D, 297, 468 

PA1NT. 122-125,221,470 

Palavras reservadas. 12, 143 

Paralelogramos, traçando e pintando, 122 

Pare a execução do programa (CTRL C), 136 

PDL, 27. 473 

PEEK. 473 

PINLIN, 583 

Pintando retângulos. 123-126, 470 
Pixels, 94-97, 107-109, 115 
Pí AY( ), 477 

PLAY (música) 126-132.475 
Plotagcm dc pontos. 101-104. 482.492 
Plotando pontos. 101-104, 482, 492 
PNT1NT, 635 
POINT, 103- 104, 221.478 
POKE, 480 

Pomos de entrada BIOS 
interface cassete, 599-603 
portas dc joystick. 595-598 
processador de display de vídeo, 601-638 
sistema de conexão, 571-577 
som, 604-605 

teclado, display dc vídeo, impressora, 578, 
594 

POS, 221, 295, 481 
POSIT, 588 
Potónciadc. 18 
Precisão dupla, 165 
constantes, 142-143 
conversão para/de, 146 

vanávcis. 143 
Precisão simples 
constantes, 142 
conversão para/de, 145 
variáveis, 143,300 
PRESET, 101-103,221,482 
PRINT, 8-13, 484 
abreviação, 31 
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cm linha, 30 
espaços, 38 
tela gráfica, 219-221 
utilização de, no fim da linha, 36-37 
PR1NTTAB, 40-41 
PRINT USING, 186-191,232,485 
PRINT USING#, 488 
PRINT#, 225. 268, 486 
PRINT # USING, 191, 231-232, 268. 491 
Processador de display de vídeo, 251-255, 488 
declarações associadas, 213-214 
pontos de entrada BIOS. 595-598 
Procurando strings, 65-67, 345 
Programas, 44-46 

cancelando, 16-17, 29-30 
carregando, código de máquina, 27 1 
escrevendo. 14-17,29-34 
estrutura, 80-81 
fundindo, 214, 375 
gravando, 47-50 
jnútliplos, na memória, 30-31 
nomes, 42 

salvando, código de máquina, 273 
salvando c carregando, BASIC, 213-214 
suspensão, 491 
terminação, 139, 469 
PSF.T, 101-102,221,492 
PUT SPR1TE, 241-243, 493 


Q 

QINLIN, 584 
Quadrados, veja retângulas 

R 

RAM, 219 

listagem de variáveis, 643-646 
veja também memória, RAM de vídeo 
RAM de vídeo, 257-258, 267, 489, 490 
RAM do sistema, listagem de variáveis, 
643-646 
RDPSG, 605 


RDSLT, 571 
RDVDP, 610 
RDVRM, 610 
READ, 54-57,495 
READC, 628 
Registros (som), 260 
Relógio, horário, 76, 193. 481 
RKM, 17,30,81,497 
REMOTE. 49 

RENUMerando linhas de programa, 31, 138, 
499 

RESTORE. 56-57, 207, 501 
RESUME, 205-206, 503 
Retângulos, traçando, 108-109 
RRTLIRN, 67, 505 
RETURN, tecla. 5-7, 274 
RIGHTS, 67, 506 
RIGHTC, 629 
R NO, 74, 507 
Rolando, 5 

ROM. cartucho. 243-246 
chamando de, 274 
veja também conector de cartucho 

Rotação das formas gráfias, 101-102 
RSLREG, 575 
Ruído (soro), 225 
RUN,15, 32, 509 


S 

Salvando dados, 267-271 
Salvando dados e programas em código dc 
máquina, 273 

Salvando programas em BASIC, 47-49, 215, 
510 

SAVE, 216, 510 
SCALXY, 624 
SCANL, 637 
SCANR.636 

SCREEN, 39, 214,295,512 
modo 0, 39. 221,94 
modo 1, 39, 222-223, 94 
modo 2, 223-224, 95-97 
modo 3, 224-225, 96-97, 107- 108 
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Seguindo a execução do programa, 31, 548 

Seno, 87-90, 455 

SETATR, 627 

SETC, 629 

SETGRP, 620 

SETM1.T, 621 

SETRD, 612 

SGN.515 

SIN, 516 

SOLND.517 

STR, 534 

SETT, 32, 547 

SETT32, 620 

SETTXT, 619 

SETWRT, 612 

SGN, 71, 454 

SIN, 84, 87, 89 

Sistema BC D (decimal em codificação 
binária), 156-159, 164-165 
Sistema de codificação binária decimal. 
156-159 

Sistema dc conectores, pontos dc entrada 
BIOS. 571-577 

veja também posiçSo de cartuchos 
Sistema operacional, 563-646 
Sistemas dc numeração, 156-164 
SKP, 49 
SNSMAT, 592 
SOUND, 259-264 
BEEP. 132 

pontos de entrada BIOS, 525-526 
veja também mósica 
SPACES, 42. 520 
SPC, 42-43, 521 
SPRITES, 236-240. 525 
Slot, 280-286 

SPRITE ON/OFF/ STOP, 249, 522 
SPACE,520 

Sprites 

animação, 247-248 
colisão, 200, 248-249, 256, 522 
cor, 244 

definindo, 235-238, 524 
display de, 241-243 
escondendo, 245-246 


gráficos, 235-250 
movendo, 243-244 
•quinta’, 246, 256 
tamanho. 235 . 

SPRITES, 525 
SPC. 521 

SOK (raiz quadrada). 84. 526 
STEP (com CIRCLE), 327 
STEP (com FOR.NEXT), 22, 527 
STEP (com LINE), 108 
STICK, 296. 429 
STMOTR. 602 
STOP. 32,430 

STOP ON/OFF7STOP, 197-198,432 
STOREC, 627 
STRS.72. 150, 534 
STRIG, 296, 535 

STRIG ON/OFF/STOP, 199-200,474, 536 
STRINGS, 93. 538 
Strings, 8 

caractere repetido, 92-93 

código ASCII do primeiro caractere, 91 

comparação, 156 

comprimento de, 73, 414 

constantes, 141 • 

conversão para, 534 

definição coroo, 301 

juntando, 65 

manipulação, 377, 445, 65-69, 412 
números, conversão a variáveis numéricas, 
71-72, 148,486 
posições de memória, 146-147 
procurando. 65-67 
utilizaçáo de memória, 146- 147 
vanáveis, 11-12, 143 
STRTMS, 606 

Sub-ro tinas. BASIC, 80-81, 329 
Sub-rotmas, código de máquina, 235-237, 485 
SWAP.26, 60, 540 
SYNCHR, 498 


T 

TAB, 38,40. 221,541 
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Tamanho de caractere, 94 

TAN, 94, 542 

Tangente, 479 

TAPIN, 600 

TAPIOF, 600 

TAPION, 599 

TAPOOF, 602 

TAPOON, 601 

TAPOUT, 601 

TDOWNC, 633 

Tecla BS, 6, 123 

Tecla CAPS LOCK.4 

Tecla CLS,5, 150 

Tecla CTRL, 17 

Tecla CODE, 5 

Tecla de controle BEEP, 132 

Teclas de função, 35-37 

Tecla de função AUTO, 36 

Tecla de função CONT, 36 

Tecla de função GOTO, 36 

Tecla de função LIST, 36 

lccla dc função KL N, 36 

Tecla de INSerção, 6, 140 

Tecla de retrocesso (RETLRN), 5, 139 

Tecla DEL, 6, 140 

Tecla ESC, 5, 140 

Tecla F 1,36, 99 

Tecla F2, 36 

Tecla F3, 36 

T ecla P4, 36 

Tecla F5, 36 

Tecla F6, 36, 99 

Tecla F7, 36 

Tecla F&, 36 

Tecla F9, 36 

Tecla FIO, 36 

Tecla GRAPH, 5 

Tecla HOME, 5, 140 

Tecla para abortar programa, 140 

Tecla para limpar tela, 5, 140 

Tecla SELECT, 6. 140 

Tecla SHIFT, 4, 5 

Tecla STOP, 5, 17, 167-168, 398 

T ecla TAB, 5, 140 

Teclas CTRL, 5, 135 


Tedas de função, 35-37, 140 
ativai/ desativar, 165, 354 
interromper, 165-166, 394 
listando definições atuais, 35, 352 
redefinição, 37, 350 
remoção de lista (linha 24), 39, 353 
Técnicas dc edição, 14-17, 135-140 
Tela, veja display de vídeo 
Telas de texto 0e 1,94-95, 187-189 
Televisão, ligação â um computador, 3-4 
Televisão, veja display de vídeo 
Testando teclas operadores do teclado, 44-46, 
392, 399 
TEXT . 289 
THEN, 25. 179. 543 
TIME, 76, 193, 545 
TO, 546 
Tom (som), 260 
Tortas, desenho (pizzas), 1 12 
TOTEXT, 590 

Traçando desenhos com DKA W, 115, 357 
T riângulos, desenhando e pintando, 123, 124, 
125 

TROFF, 34, 547 
TRON, 33-34, 548 
TUPC. 632 


u 

LPC,631 
USR, 276, 550 


V 

V AL, 72-73, 15U-152, 552 
Valor absoluto, 304 
Valor do manipulador, 412 
Variáveis, 10, 143-145 

declaração de tipo, 141 
DEFimção de tipo, 144 
denominando convenções, 10, 18, 144 
inteiro, 299 

Liberando da memória, 28 1 
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local, 77 
matrizes, 145 

numérico, conversão Je tipo, 148- 150 
posições de memória, 146, 487 
precisão dupla, 296 
precisão simples, 300 
string, 30 1 

utilização de memória, 146 
VARPTR, 146-147, 165,275, 554 
VDP, 221,555 
VPEEK, 221,556 
VPOKE, 221, 558 


WA IT, 559 

WIDTH, 40, 221-222,560 
WRSLT. 503 
WRST, 572 
WRTPSG, 605 
WKT V DP, 609 
WRTVRM, 611 
WSLREG, 576 

X 

XOR, 170-172,561 
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